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Preface 


BASIC has traditionally been accepted as the most effective programming 
language for instructional purposes. In recent years, business and com- 
puter manufacturers have recognized the vast potential for the BASIC lan- 
guage beyond education. Therefore, the availability and usage of BASIC 
has increased dramatically. Today most small business computer systems 
and home computer systems rely heavily on BASIC programming support. 

One major problem associated with such tremendous growth has 
been the lack of controls on the implementation of the language. Although 
there is a national standard (ANSI) version of BASIC, it is normally not 
followed by computer designers. Thus there are differences in the BASIC 
language found on various computers. The material in this book not only 
presents BASIC found on a typical large time-shared computer system (Dig- 
ital Equipment Corp.), but also includes coverage of microcomputer imple- 
mentations (Apple, IBM, PET/Commodore 64, TRS-80). Whenever a BASIC 
instruction deviates from the national standard, it is highlighted. 

Color coding has been used extensively throughout the material to 
assist the reader. The following legend should prove valuable: 


Blue Computer Output 
—<—<— | 


Red User Response 
Grey shading Ne ndard BASIC 


Several special features have been included in the text to assist the 
student to better grasp the material. Learning Checks with answers are 
included as a means of self testing before proceeding to a subsequent sec- 
tion. A Comprehensive Programming Problem permits the student to bring 
all of the key chapter material together. An extensive set of Review Ques- 
tions, Debugging Exercises, and Programming Problems provide a wide 
selection of feedback material for comprehension. 

A criticism of many BASIC textbooks is a lack of examples depicting 
how instructions are actually utilized. This text has focused on these con- 
cerns. Throughout the material, every effort has been made to teach the 
student through showing rather than telling. In this manner the instruc- 
tions become concrete rather than visual abstractions. Flowcharts are also 
widely spaced throughout the text to provide a graphical exploration of 
the programming segments. 

A special note of appreciation to Terrye Gregory, Dr. Stephen Greg- 
ory, Bob Szymanski, and Karen McKee for their herculean efforts on this 


project. Every program has been both class tested and run on the various 
computer systems. I would also like to thank the following reviewers 
whose insight greatly improved the manuscript: George A. Bohlen, Uni- 
versity of Dayton, and David A. Kay, Moorpark College, California. Our 
primary goal has been to develop a student-oriented BASIC text that is both 
logical and consistent in its presentation. I would appreciate receiving any 
suggestions that might improve the material. 


STEVEN L. MANDELL 
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Background 


BASIC was developed in the mid-1960s at Dartmouth eben BW Prot 
sors John G. Kemeny and Thomas E. Kurtz and has be 


es. BASIC, short for Beginner’s All-purpo 
easy to learn, can be used for a wide variety 
of useful tasks, and is well suited for classroom teaching. 


BASIC, like any language, includes rules for spelling, syntax, grammar, 
and punctuation. Just as the rules in English help us understand one an- 
other, so the rules in BASIC help the computer understand what we want 
it to do. In BASIC, the rules link abstract algebraic expressions with easy- 
to-understand English words like LET, GOTO, FOR/NEXT, INPUT, 
PRINT, and END. 

BASIC was originally developed for use in a large, interactive computer 
environment: one or more BASIC users could communicate with the com- 
puter during processing and feel as though they had the computer all to 
themselves. As the demand for minicomputers and microcomputers in- 
creased, manufacturers of such computers felt pressure to develop simple 
but effective languages for them. Rather than create entirely new lan- 
guages, most opted to offer BASIC because of its interactive capability— 
where the user can communicate directly with the computer in a conver- 
sational fashion. Many altered the original BASIC, however, to suit their 
equipment. The result is that, although the BASIC language has a univer- 
sally accepted set of standard rules called ANSI BASIC, each manufacturer 
adds its ‘‘quirks” to this standard to make use of special features of its 
machines. 

This book discusses BASIC commands common to most computer systems 
but will note the language variations among vendors. Most programming 
examples have been executed on five different computers: a DECSYSTEM 
20 to represent the major time-sharing systems; and the Apple, IBM Per- 
sonal Computer, TRS-80, and PET/Commodore 64 to represent popular 
microcomputer systems. Most other microcomputers are capable of using a 
dialect called BASIC-80 from Microsoft Consumer Products and an operat- 
ing system called CP/M produced by Digital Research. Since the IBM’s 
BASIC and operating systems were also designed by Microsoft, they are 
similar to BASIC-80 and CP/M. Therefore references for those systems 
will parallel the IBM instructions. The programming examples will run on 
the DECSYSTEM 20 computer, but important changes required to execute 
them on the other computers are noted. Although there are a variety of 
models and languages for the Apple and TRS-80 computers, this book dis- 
cusses only one of each—the Apple II computer with the Applesoft lan- 
guage and the TRS-80 Model III computer with Model III language (essen- 
tially the same as level II BASIC for Model I). 
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Computers and the Stored-Program Concept 


e following functions, re- 


spectively: accept data (input), process data by performing comparisons 
and calculations, and output the results. Computers perform operations 
through the use of electronic currents. They are fast, accurate, inexhaust- 


ib 
‘ata ar fat, numbers and characte ht often are entered into the 
computer via a typewriter-like keyboard. Many other types of input de- 


vices also can be used to enter data (light pens, scanners, tapes, and so on). 


g take etic, and wincial car. 
acter of ya is ed in the r main computer tnaioy when it is entered. 

The contents of main memory can be transferred to auxiliary storage 
devices such as magnetic tape and disks. This allows us to bring in new 
data to main memory while preserving the previous contents. The data on 
the auxiliary storage devices later can be loaded into main memory and 
used again without the user’s having to retype it. Main memory also stores 
the instructions (processing steps) that tell the CPU what to do with the 
data. This ability to store all necessary instructions and data to execute a 
program is referred to as the stored-program concept. In the early days of 
computers, before the stored-program concept was realized, human opera- 
tors had to manually enter the instructions and data needed to run a pro- 
gram as it was running, thus slowing down the processing considerably. 

After the data has been processed, the results of processing are output 
in the form of useful information. Output units such as video screens and 
printers make the results accessible for use by people. Figure 1-1 illus- 
trates a typical basic computer system. 


Computer Processing: Arithmetic and Logical Operations 


Once the data has been entered and stored in main memory, it can be 
processed. Basic arithmetic operations such as addition, subtraction, mul- 
tiplication, and division can be performed on numeric data. The results of 
arithmetic operations can be used for further operations or as output. 
Computer systems also have the ability to perform logical operations. 
Numbers, letters, and special characters can be compared to see if they are 
equal to, less than, or greater than one another. The computer then can 
determine what steps to take according to the results of these comparisons. 


Interpreters and Compilers 


A programmer writes the instructions, or processing steps, in a program- 
ming language such as FORTRAN, COBOL, and Pascal. This book will 
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Figure 1-1 BASIC COMPUTER SYSTEM 


Output Units 


Input Units Processor 


| Unit 


Printer 
USER ae 
Keyboard 


Process 
Data 


Cathode-Ray Tube 


teach you how to write programs using the BASIC programming language. 
These languages are high-level languages, which are fairly easy for people 
to understand. However, the CPU cannot interpret these languages. The 
CPU, which executes the instructions, can understand only machine lan- 
guage (the code of 0’s and 1’s that designates the proper electrical states in 
the computer). Microcomputer systems require an interpreter or compiler 
to translate the high-level language to machine language. Interpreters and 
compilers are programs that are either loaded into the computer from disk 
each time the system is turned on or stored permanently inside the com- 
ae in nl ae 

Ap or BASIC, whereas larger sys- 

; ges. This is because a compiler 
Seren requires paren more corer space than an interpreter. The dif- 
ference between an interpreter and a compiler is that the compiler creates 
an object program (the entire program in machine language format) and 
then loads the entire object program into main memory. The CPU then 
directly executes the object program. An interpreter passes only one line 
of machine language at a time to the CPU. Programs that have been com- 
piled into an object program normally execute faster than those translated 
by an interpreter. 


Introduction to Computer Programming 


Computer programs (also called software) are step-by-step instructions to 
solve a problem. Since the computer must be able to read and interpret 
each instruction, it must be precisely written. To know what instructions 
are required to solve a problem, the programmer follows five steps, com- 
monly called the programming process: 
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1. Define and document the problem. 
. Design and document a solution. 


oN 


Write and document a program. 
4. Submit the program to the computer. 


5. Test and debug the program, and revise the documentation if 
necessary. 


To show how these steps are used in the programming process, let us take 
a sample data-processing problem: calculating our metric weight from our 
weight in pounds. 

The first step is to define and document the problem. T 


analyze it by using the basic flow of all data processing 

“output bo with a twist. It is often easier to determine what processing is 
needed by working backward. First, determine what output is required, 
and then see what input is available for the program. The gap between the 
available input and the required output will be the processing needed in 


the program. 
Determining the output required for the problem is quite simple—we 


need to know our weight in kilograms. The input available is our wei 
in pounds. We now need to develop 
that will enable us to produce the de e available input. 


We need some conversion factor that translates the weight in pounds to 
kilograms. One kilogram equals 2.2 pounds; hence, the algorithm to calcu- 
late our metric weight is metric weight = weight + 2.2 pounds. We have 
now defined the problem. 

The second step, designing and documenting a solution, requires devel- 
oping a logical sequence of instructions, or statements, to solve the prob- 
lem. Remember, good documentation can help avoid future problems or 
make them easier to solve when they do come about. Documentation con- 
sists of all written descriptions and explanations necessary for later modi- 
fication or updating of the program. A great tool to use at this point is the 
flowchart. Flowcharts are a form of documentation and are composed of 
symbols that stand for program statements. For example, the symbol for a 
processing step is this: 


The following is the symbol for a step that involves either input from the 
terminal or output to the terminal or printer: 
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This symbol shows where the program starts or stops: 


To create a flowchart for our example, we only need these three sym- 
bols. Some additional symbols that we will use later in this book include 
the following: 


1. The symbol that shows where a comparison (decision) is to be made 
and where alternative processing is to occur based upon the results of 


the comparison is this: 


2. To indicate an entry from or an exit to another part of the program 


flowchart, use this symbol: 
© PS 


3. The following symbol represents a preparation step, such as defining 
the dimensions of an array (discussed in Section 9): 


Ga i 


Figure 1-2 shows a flowchart depicting the steps of the programming 
example. Notice how the symbols are shown in logical order, top down, 
connected by arrows. The first symbol shows the start of the program. It 
may correspond to one or more remarks at the beginning of the program. 
The second symbol shows an input step—we enter our weight. The third 
shows the processing done by the program—conversion of weight in 
pounds to metric weight. After that, we want to see the result, so we 
output the converted weight to the terminal. Finally, another start/stop 
symbol signifies the end of the program. The flowchart makes it easy to 
see the input, processing, and output steps of the program. 

If the solution has been designed carefully, the third step—writing and 
documenting the program—should be relatively easy. All that is required 
is to translate the flowchart into BASIC statements. Figure 1-3 shows this 
program written in BASIC. As you can see, many BASIC words, such as 
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ANSI Standards 


Figure 1-2. FLOWCHART EXAMPLE 


Calculate 
Metric 


Weight 


Print 
Metric 
Weight 


INPUT and PRINT, are easy to interpret. The symbol / means “‘divide.”’ 
The REM statement is used to document the program. Compare the coded 
BASIC statements in Figure 1-3 to the flowchart in Figure 1-2; the corre- 
spondence between the two is obvious. 

In the program in Figure 1-3, each statement starts with a line number. 
Line numbers tell the computer the order in which to execute statements. 


The purpose of a programming standard is to make it possible for a program to have 
transportability. In other words, if you write a program whose syntax lies completely 
within the BASIC standard, this program will run correctly on any brand of computer 


that claims its BASIC meets the standards. 
The American National Standards Institute, Inc. (ANSI), 1430 Broadway, New York, 


NY 10018, has published the ANS! Standard for Minimal BASIC. It is one of the 
standards least adhered to, with extremely few manufacturers’ designing their 
machines around it. As the title of the document suggests, the standard does not 
include many features implemented by computer manufacturers. 
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Figure 1-3 METRIC WEIGHT PROGRAM 


Line 100 is a comment describing the program. The computer ignores all 
such comment statements; they are for documentation purposes. Line 105 
tells the computer to print out a statement (shown in quotes)—your cue to 
enter your weight—and then to accept the input after you type it in. Line 
110 is an example of an assignment statement, which assigns values on the 
right side of the equal sign to special variables on the left (this is discussed 
in Chapter 3). Line 115 instructs the computer to print out first a heading 
(shown in quotes) and then the computed metric weight. Finally, line 999 
tells the computer to stop processing. Again, you can see how each state- 
ment follows the flow of input, processing, and output. 

The fourth step involves sitting down 4 


Syntax refers to the way instructions have to 
followed, just as grammatical rules must be followed in English). A syntax 
check can save considerable debugging time. Figure 1-4 shows an interac- 
tive session with syntax checking. 

In the first example, the word PRINT was misspelled. After entering 
line 10, the computer performed a syntax check. Upon discovering that the 
keyword PRINT was misspelled, the user is informed of the error. In this 
case, the computer reprinted the line in error followed by the error mes- 
sage: ? STATEMENT NOT RECOGNIZED. In the second example, an 
arithmetic expression was found on the left side of an equal (=) sign. In 
BASIC, only a single variable name can be on the left side of an equal sign. 
The computer informs the user of the syntax error by reprinting the line in 
error followed by the error message: ? FOUND “+” WHEN EXPECTING 

After all syntax errors have been eliminated, the program can be tested 
with sample data (the fifth step). During this stage, the logic of the program 
is checked for correctness; for instance, were the correct statements used 
to determine the metric weight? Figure 1-5 shows the execution of the 
metric weight program. 

During each of these five steps, it is important that adequate documen- 
tation be written and maintained. During the last step, any revisions to the 
documentation that may be required should be made. 

This example is relatively simple, but it shows each of the steps re- 
quired to complete a program. Although other problems may be more com- 
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Figure 1-4 =SYNTAX CHECKING 


(0 PRING "I MISSPELLED PRINT" 
pO PRING "| MISSPELLED PRINT" 


? Statement not recognized 


PO REM *** EQUAL SYMBOL WILL BE IN THE WRONG PLACE 


| Found "+" when expecting "=" 


plex, the steps involved are the same. Successful programming can only 


come about through diligent application of the five steps in the program- 
ming process. 


Figure 1-5 
EXECUTION OF 
METRIC WEIGHT 
PROGRAM 
RUNNH 
ENTER YOUR WEIGHT IN POUNDS ? 150 : 
MOUR METRIC WEIGHT IS 68.18182 KILOGRAMS § 
| 
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LEARNING CHECK 


- A computer system consists of three primary units: Aou* _, -Phansovend 
rp ult Dus 4 


2. i2ut« _ are facts, numbers, and characters that are entered into the com- 


puter. 
3. The processor unit is divided into two main parts: the <Qu and the 
Aowm Manors ae 


4. The stcod ecesfefers to the ability to store internally all necessary instructions 
and data to execute a program. 

5. A(n) ise<\ “or a(n) so. ‘2% translates a high-level language to machine 
language. 

6. The following is the correct sequence of steps for the programming process: 
Define and document the problem; design and document a solution; write and 
document a program; submit the program to the computer; test and debug the 
program, and revise the documentation. TRUE) FALSE (Circle the correct an- 
swer.) rs 


Interacting with the Computer 


ani 

Jaiduoo ‘198}a1d49}uUI 
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An important step in BASIC programming is learning to control the com- 
puter. Although this book cannot present the full operational details for 
each computer, it can discuss the principles of how to turn the computer 
on, use the BASIC programming language, retrieve a program from auxil- 
iary storage, display the program, alter the program, and save the program 
for future reference. 


Basic System and Editing Commands 


BASIC programming requires the use of several types of commands. Some 
of the commands, such as GOTO, LET, and READ, are program language 
statements. They are assembled into programs to solve specific business, 
scientific, engineering, and mathematical problems. The remaining chap- 
ters of this book describe their characteristics and how they are used. 

There are also system commands and editing commands used by the 
programmer to communicate with the operating system of the computer to 
perform functions like saving programs for future reference and making 
changes in programs. Table 1-1 summarizes common system and editing 
commands. Some commands, such as LIST, RUN, and DELETE, are almost 
universally used but are not covered by ANSI standards. Appendixes A 
through E describe such commands as they relate to the five computer 
systems used in the programming examples in this book. 
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Table 1-1 


POWERSWITCH 
LOCATION 


SIGN-ON 
PROCEDURES 
User 

Computer response 


User 


STARTING BASIC 
User 
Computer response 


User 
Computer response 
User 


SYSTEM COMMANDS 


List 
Execute a program 
Delete a line 


Store program on disk 
Store program on tape 
Retrieve program from 


disk 


Retrieve program from 


tape 


SIGN-OFF 
PROCEDURES 
User 

Computer response 
User 


DEC 


Left rear of terminal 


Control-C 
TOPS-20 MONITOR 


LOG ACCT. # PASSWORD 


BASIC 
READY 


NEW 

NEW FILENAME-- 

Enter name of program; begin 
typing program 


LIST 

RUN 

DELETE line # 
SAVE 

Does not apply 
OLD 

OLD FILENAME-- 
Does not apply 


GOODBYE or BYE 
KILLED JOB 
Power off 


COMMON SYSTEM AND EDITING COMMANDS 


Apple 


Left rear of terminal 


No response 
APPLE Il 


No response 


Comes up in BASIC 
Flashing cursor 


Begin typing program 


LIST 

RUN 

Type line #, then RETURN 
SAVE name 

SAVE 

LOAD name 

or RUN name8 

LOAD 


No response 
No response 
Power off 


PET/Commodore 64 


Right side panel (rear) 


No response 

***COMMODORE 64 BASIC 
yore 

No response 


Comes up in BASIC 
READY 

(Flashing block) 
Begin typing program 


LIST 

RUN 

Type line #, then RETURN 
SAVE ‘‘name’’8 

SAVE ‘‘name"’ 

LOAD ‘‘name"’, 


LOAD “name” 


No response 
No response 
Power off 


The system and editing commands are immediate-mode commands; that 
is, they are executed as soon as the carriage control key (RETURN, EN- 
TER) is pressed. They differ from BASIC language commands, which are 
not executed until the program is run. The most commonly used system 
commands are discussed in the following sections. 


System Commands 


NEW The NEW command tells the computer to erase any program cur- 
rently in active memory. After typing this command, you can start enter- 
ing a new program. 
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POWERSWITCH 
LOCATION 


SIGN-ON 
PROCEDURES 
User 

Computer response 


User 


STARTING BASIC 
User 


Computer response 
User 
Computer response 
User 


SYSTEM COMMANDS 
List 

Execute a program 
Delete a line 

Store program on disk 
Store program on tape 
Retrieve program from 
disk 

Retrieve program from 
tape 


SIGN-OFF 
PROCEDURES 
User 

Computer response 
User 


TRS-80 


Right front under keyboard 


No response 

CASS? 

MEMORY SIZE? 

RADIO SHACK MODEL Ill 
BASIC 

(C) 80 TANDY 


Respond to CASS? 
and MEMORY SIZE? 
Queries 


Comes up In BASIC 


READY 
Begin typing program 


LIST 
RUN 
DELETE line # 
SAVE '‘name” 
SAVE “name” 
LOAD ‘‘name” 


CLOAD ‘‘name”’ 


No response 
No response 
Power off 


COMMON SYSTEM AND EDITING COMMANDS (continued) 


IBM/Cassette BASIC 


Right rear of computer 


No response 

IBM Personal Computer BASIC 
Version C1.00 Copyright IBM 
Corp. 1981 

61404 Bytes Free 

OK 


No response 


Comes up in BASIC 


OK 
Begin typing program 


LIST 
RUN 
DELETE line # 


LOAD ‘‘name” 


No response 
No response 
Power off 


IBM/Disk BASIC 


Right rear of computer 


No response 

Enter today's date (m-d-y): 
time 

The IBM Personal Computer 
DOS Version 1.10 (C) Copy- 
right 

IBM Corp. 1981, 1982 

A> 

Respond to date query 


Type BASIC or BASICA 
(For Advanced BASIC) after 
computer types A > 

OK 

Begin typing program 


LIST 

RUN 

DELETE line # 
SAVE “'name”’ 

Does not apply 
LOAD “name” 


Does not apply 


No response 
No response 
Power off 


LIST After typing in a long program, you may want to admire the fin- 
ished product. Type LIST to see the program commands displayed at the 
terminal. If you have a very short program, LIST can display the whole 
program on the screen. However, if the program has more lines than the 
screen does, only the last part of the program will remain on the screen. 
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Some screens permit only twenty-four lines to be displayed. You can dis- 
play portions of programs by specifying the lines to be listed—LIST 250- 
400, for example. Most computers also allow you to suppress scrolling, that 
is, to freeze the listing temporarily (see ‘Controlling the Scroll” later in 
this section). 


SAVE After you have typed many program lines, you will want to avoid 
losing them when the computer is turned off. To do this, you have to move 
a program from main memory to an auxiliary storage medium such as a 
cassette tape or disk. This move is accomplished by the SAVE command. 
There are generally several options to this command; for example, you 
may supply a name that distinguishes this particular program from all 
others. The discussions of each computer in Appendixes A through E sum- 
marize the most elementary forms of the SAVE command. 


LOAD This command moves the designated program from auxilary stor- 
age to main computer memory. Before moving the program. LOAD closes 
all open files and deletes all variables and program lines currently residing 
in memory. 


Controlling the Scroll If your program’s output consists of forty lines of 
information but your screen only has a twenty-four-line capacity, how 
will you see all your output? The forty lines will be displayed so quickly 
that you will not be able to read them until the listing is finished. By then, 
however, the first sixteen lines will be gone—scrolled off the top of the 
screen. 

Most computers have a means of controlling the scroll of the screen. 
The programmer can simply push one or two keys to freeze the display 
and then press the same keys to resume listing when desired. This method 
also can be used to freeze the output listing of a program during execution. 

The next box in this chapter summarizes the method of scroll freezing, 
as well as the type of editor (discussed below) used on each of the five 
computers. 


Editing Commands 


Everyone makes typing mistakes. You should quickly learn how to correct 
yours. You may find a mistake before you press the RETURN key, or you 
may find it later. These two conditions call for different methods of cor- 
rection. 


Before RETURN Has Been Pressed Suppose you type LOST when you 
wish to LIST a program. If you notice the error before pressing RETURN, 
you can move the computer’s cursor back to the O in LOST by pressing the 
DELETE key (on the DEC), the <- key (on the Apple, IBM, and TRS-80), or 
the INST DEL key (on the PET /Commodore 64). Then you can retype LIST 
correctly. 


After RETURN Has Been Pressed If you notice an error after RETURN 
has been pressed, the simplest correction, in principle, is to retype the 
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Type of Editor and Screen Editor? Line Editor? Scroll Stop/Start 
Scroll Control 


DECSYSTEM 20 NO SCROLL' 
Apple CTRL-S? 
IBM/Microsoft CTRL-NUMLOCK? 
TRS-80 SHIFT-@* 
PET/Commodore 64 None® 


Notes: 

1. NO SCROLL is a separate single key. 

2. CTRL-S means hold down the CONTROL key and the S key at the same time. 

3. CTRL-NUMLOCK means hold down the control key and the NUMLOCK key at the same time. 
4. SHIFT-@ means hold down the SHIFT key and the @ key at the same time. 

5. There is no scroll stop/start keys; however, pressing the shift key slows down the scroll to one 
line at a time. 


whole line. This may get tiresome for long lines, however—especially if 
you need to change only one character. Each computer has a means of 
correcting mistakes within a given line. There is not enough space here for 
a full explanation of these methods, but there are two general kinds—the 
screen editor and the line editor. 

To use the screen editor, list the portion of the program containing the 
error. Then move the cursor to the position of the error—typically by 
pressing four keys with arrows that move the cursor up, down, left, or 
right. The incorrect characters then can be typed over or deleted, or new 
characters can be inserted between existing characters. 

The line editor works on individual lines. The user specifies the line 
containing the error and uses commands such as REPLACE, INSERT, and 
DELETE instead of moving the cursor to the error. 


LEARNING CHECK 


. Commands used by the programmer to communicate with the operating sys- 
tem of the computer are called 


. System and editing commands are _______ commands; that is, they are exe- 
cuted as soon as the carriage control key is pressed. 

. The _____. command tells the computer to erase any program currently in 

JO}IPS BUI] JO}IPS UBBIOS *G memory. ; : 
ANS ‘bv . The ______ command is used to move a program from internal memory to an 

MAN ‘€ external storage medium such as a cassette tape or disk. 

Spool penal 6 . Two general types of editors are the _______ and the 
spuewwoo weaysks “4 


siamsuy 
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Summary 


Review Questions 


oO Fr WN 


BASIC (Beginner’s All-purpose Symbolic Instruction Code) was devel- 
oped in the mid-1960s by Professors John G. Kemeny and Thomas E. 
Kurtz. 


BASIC has rules of grammar (syntax) to which programmers must ad- 
here. 


A computer system consists of three primary units: input units, the pro- 
cessor unit, and output units. 


Computers can perform the following functions: accept data (input), 
process data, and output results. 


The processor unit is made up of two main parts: the CPU and main 
computer storage. 


The stored-program concept refers to the ability to store all necessary 
instructions and data to execute a program. 


The CPU uses arithmetic and logical operations to manipulate data to 
obtain the desired results. 


Interpreters and compilers are programs that translate high-level lan- 
guages into machine languages. 


The following are the five steps in the programming process: (1) define 
and document the problem; (2) design and document a solution; (3) 
write and document a program; (4) enter it into the computer; and (5) 
test and debug the program, and revise the documentation if necessary. 


System commands are used by the programmer to communicate with 
the operating system of the computer. Some commonly used ones are 
NEW, LIST, and SAVE. 


Editing commands help the programmer correct mistakes. 


Table 1-1 summarizes start-up procedures and common system and 
editing commands. 


. What is BASIC? 

. What three primary units are required on a computer system? 
. What three functions are required of a computer system? 

. The processor unit is divided into what two parts? 


. What is data, and where is it stored when entered into the 
computer? 


. Where is data processed? 
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16. 
ee 


18. 
19. 
20. 


. How are the results of processing made accessible for use by people? 
. What is the stored-program concept? 

. What is the purpose of interpreters and compilers? 

. Computers can process data using what two general types of 


operations? 


. Name the five steps of the programming process. 

. What is documentation, and why is it important? 

. What is the basic flow of all data processing? 

. What tool is useful in designing a solution (Step 2 of the five steps)? 
. Which of the following symbols represents a processing step? 


— fa 
Ea Gi 
What is a syntax error? 


The commands used by the programmer to communicate with the 
operating system are referred to as 


Explain the function of the system command NEW. 
Explain the function of the system command LIST. 
Explain the function of the system command SAVE. 


Introduction to BASIC 


17 


BASIC Fundamentals 


Overview 


After reading this chapter the student should be able to do the following: 


@ Understand what a BASIC program is. 
@ Recognize a BASIC instruction. 
@ Understand the function of line numbers. 


@ Recognize and understand the use of numeric and character string 
constants. 


@ Recognize and understand the use of numeric and string variables. 


One of the best ways to learn any programming language is to examine 
sample programs. This and the remaining sections in this text will 
intersperse discussions of the language’s general characteristics with 
program examples and practice problems to promote the learning 
process. 

This chapter discusses some BASIC fundamentals: line numbers, 
BASIC statements, constants, character strings, and variables. All are 
demonstrated so that you can use them properly when you write 
programs. 


Fundamentals of the BASIC Language 


A BASIC program is a sequence of instructions that tells the computer how 
to solve a problem. Figure 2-1 is an example. This program calculates the 
gross pay of an employee who worked thirty hours at a rate of pay of $4.50. 

Notice that each instruction contains a line number and a BASIC state- 
ment. BASIC statements are composed of special programming commands, 
numeric or character string constants, numeric or string variables, and 
formulas (also called expressions). Line 120 from the sample program is a 
typical BASIC statement. It tells the computer to multiply two values to- 
gether and place the result in a location called G. G is the location in 
memory where the gross pay is stored. 

On the DECSYSTEM 20 there are two commands, RUN and RUNNH, 
that can be used to execute (run) a program. If RUN is used, as in Figure 2-1, 
the computer will print a header giving the name of your program, the 
date, and the time as well as the output of the program. The RUNNH (Run 
No Header) command will eliminate the header and print only the output 
of the program. Throughout the remainder of this book we will use the 
RUNNH format. (See box “Important Keys and Commands.’’) 


Line Numbers 


The line number must be an ac between 1 and HE ere 


Important Keys and Commands 


Carriage 
Execution Control 
Computer Command Key Comments 


DECSYSTEM 20 RUN or RUNNH RETURN = RUNNH means “'RUN No Header.” When RUN alone is pressed, the 


computer prints out the date and a system-identifying label. 

Apple RUN RETURN 

IBM/Microsoft RUN a Although there is no lettering on the key, we will refer to it as Carriage 
return. 

TRS-80 RUN ENTER The ENTER key is located on the right side of the keyboard. This is the 
location of the RETURN key on the other computers. The two keys serve 
the same purpose. 

PET/Commodore 64 RUN RETURN 
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Figure 2-1 GROSS PAY PROGRAM 


| 
pilednesday, September 21, 1983 14:04:01 | 


| GROSS PAY 1S 135 | 
| 
Complte Fime: 0.052 secs | 


| Run time: 0.102 secs Elapsed time: 0:00:02 
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statements are executed by the computer in the sequence in which they 
are numbered. (Later we will explain how this sequence can be altered.) 
Line numbers also can be used as labels to refer to specific statements in 
the program. 

Line numbers do not have to be specified in increments of 1. Using 
increments of 5, for example, makes it easier to insert new statements 
between existing lines at a later time without renumbering all the old 
statements in the program. For example, if we wanted to insert a new 
statement in the sample program between statements 115 and 120, we 
could number the new statement 117 without disturbing the order or 
numbering of the existing statements (see Figure 2-2). The BASIC inter- 
preter or compiler arranges all the program statements in ascending order 
according to line number, even though the lines actually may have been 
entered in some other order. 

Another advantage of BASIC line numbers is that they permit changes 
to be made to the program as it is being entered. For example, if two lines 


Figure 2-2 GROSS PAY PROGRAM WITH INSERTED LINE 


00100 REM *** THIS PROGRAM COMPUTES AN *** 
00105 REM *** EMPLOYEE'S GROSS PAY *** 
00110 LET H = 30 

00115 LET R = 4,5 


00120 LET G =H 

00125 LET C$ = nGROSS PAY=-15" 
00130 PRINT C$;G 

00999 END 
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are typed in with the same line number, the computer will accept the last 
one entered as the correct one. Thus, if we make a mistake in a statement, 
we can simply type in the same line number and the correct statement. 
Suppose that in the gross pay example, we gave H the wrong number of 
hours; it should have been 40, not 30. All we have to do to correct this is 
type the line number of the line to be changed and then retype the instruc- 
tion with the correct number of hours: 


The line we just entered will be put into computer memory where line 110 
in the program was stored. The first instruction with line 110 is erased 
from the computer’s memory. 
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In the remaining portion of this chapter, we will take a closer look at 
numeric and character string constants and numeric and string variables. 


Constants 


Constants are values that do not change during a program’s execution. 
There are two kinds: numeric and character string. 


Numeric Constants 


BASIC permits numbers to be represented in two ways: as real numbers or 
in exponential notation. 


Real Numbers Real numbers can be either integers or decimal fractions. 


The following are some examples of real numbers: 


Real 


Decimals Integers 


0.58 —72456 
6.782 +56 
—7.234 5000 


There are some rules to remember when using numbers in BASIC: 


1. No commas can be embedded within numbers: 


3751 (valid) 7,892 (invalid) 
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BASIC interprets the invalid example not as the number seven 
thousand eight hundred ninety-two, but as the number seven and the 
number eight hundred ninety-two. 


2. If the number is negative, it must be preceded by a minus sign: 
—0.145 (valid) 0.145— (invalid) 
3. If no sign is included, the number is assumed to be positive: 


4096 is the same as +4096 


Exponential Notation Exponential notation (scientific notation) usually is 
used for very large or very small numbers. Some examples follow: 


2.783019E+09 3.724E—06 


The E represents base 10, and the signed number following the E is the 
power to which 10 is raised. The number preceding the E is called the 
mantissa and in most systems lies between 1.000 and 9.999. A plus sign 
(+) by the power indicates that the decimal point is to be shifted to the 
right that number of places, whereas a minus sign (—) indicates that the 
decimal point should be shifted left the power number of places (see Fig- 
ure 2-3). 
The following are examples of exponential notation: 


Decimal Power Equivalent Exponential Notation 
5278 5.278 X 103 5.278E+03 

0.0000021 21610 © 2.1E—06 

— 923180 —9.2318 X 105 —9.2318E+05 


Figure 2-3 EXPONENTIAL NOTATION 
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a Character String Constants 


r The other type of constant is the character string. Character strings are 
composed of alphanumeric data—a sequence of letters, numbers, and/or 
| special characters enclosed in quotation marks. The maximum number of 
characters allowed in a character string varies from system to system. 


The following are examples of character 


strings: 
"MIKE" 


"281-77-6625" 
"310 LAREDO DR." 


The program in Figure 2-1 contains a character string in line 125: 


LEARNING CHECK 


. A sequence of instructions that tells the computer how to solve a problem is 


a(n) 
. ABASIC instruction is composed of a(n) _______ and a(n) 
. Line numbers 
de * a. must be in increments of 1 
~~ Eten . b. dictate the sequence of execution of BASIC statements 
jenuauodxe ‘sioquinu eal *p c. must be real numbers 
a ‘t d. all of the above 
_ juaweyeis . BASIC permits numbers to be represented as 
olswa boon : . Acharacter string is composed of 
siomsuy 


Variables 


Any data values to be used by a program must be stored in the computer 
either before or during execution of the program. The computer has a 
great number of storage locations, which are assigned names by the pro- 


grammer. These names are called eeriebl names, because the value 
stored in @ g 
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something like post office boxes. The Variable is the P.O. box number, the 
memory cell is the actual box itself, and the value that is stored in memory 
is like the mail; however, in a computer memory “box”’ there can only be 
one piece of “mail” at a time. Each time a new piece of ‘‘mail” is put in the 
memory “box,” the old one is taken out. 

There are two types of variables: numeric and string. In our examples, 
H, R, and G are numeric variables, and C$ is a string variable. 


Numeric Variables 


A numeric variable name represents a number that is either supplied to 
the computer by the programmer or internally calculated by the computer 
during execution of the program. A numeric variable name can be either 
one letter alone or one letter followed by one numeric digit. 


e€ tollowing examples show 


valid and invalid numeric variable names: 


Valid Invalid and Why 


bs 33 (must begin with a letter) 
B4 *C (must begin with a letter) 
A 6 (cannot be a single digit) 


Note lines 110, 115, and 120 in the program in Figure 2-2: 


H contains the hours worked—30. R holds the rate of pay, and the location 
of G has the result of hours multiplied by rate. 
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String Variables 


A string variable name can represent the value of a character string—for 
example, a name, an address, or a Social Security number. String variable 
names are distinguished from numeric variable names by the use of the 
dollar sign ($) following a single alphabetic character. The following are 
examples of valid and invalid string variable names: 


Valid Invalid and Why 


H$ 6$ 
(first character must be alphabetic) 
$ 
T$ X 
(last character must be $) 
R1 


Typical examples of the proper use of string variables can be seen in 
lines 125 and 130 of the sample program: 


The character string “GROSS PAY IS” is assigned to the string variable 
name C$. In line 130, the values of C$ and G are printed out. This is the 
output: 


RUNNH 
GROSS "PAY *F53155 
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Common DECSYSTEM ass 
20 Reserved Words 


DATA 
DIM 
FOR 
GOTO 
LEFT$ 
MID$ 
OPEN 
READ 
RIGHT 
SQR 
STRS 
THEN 
WHILE 


RESTORE 
SGN 
STEP 
TAB 
UNTIL 


COs 
DELETE 
EXP 
GOSUB 
INT 
MAT 
ON 

PUT 
RETURN 
SIN 
STOP 
TAN 
VAL 


Reserved Words 


Reserved words are words that have a special meaning to the translator 
program (the interpreter or compiler) of the computer. These words cannot 
be used as variable names. The “Common DECSYSTEM 20 Reserved 
Words” box shows some of the most commonly used reserved words for 
the DECSYSTEM 20. Refer to your system’s manual for additional re- 
served words or any differences in your system. 


LEARNING CHECK 


Ae 


(uBis se\}0p) ¢ 
p pue o 

Buns ‘oueunu 
aiqeuen 


Summary 


program is executed. 
Variables can be one of two types: 


allows the value stored in a storage location to change as the 


oy Bye REE EY 


Which of the following are valid numeric variable names? 


a. 3B 
b. $X 
c--@ 
d. T2 


A string variable name is identified by the use of the 


ing a single alphabetic character. 


character follow- 


A BASIC program is a series of instructions. Each one is composed of a 
line number and a BASIC statement. 
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Review Questions 


» WO NH 


IN 


m The line numbers serve (1) as labels by which statements can be refer- 


enced and (2) as instructions to specify the order of execution of the 
program. 


Using line numbers in increments of 5 or 10 permits easy insertion of 
new statements. 


BASIC statements contain special reserved words (programming com- 
mands), numeric or character string constants, numeric or string vari- 
ables, and formulas. 


Constants are values that do not change. A valid numeric constant is 
any real number expressed as an integer, decimal fraction, or in expo- 
nential notation. Character strings are alphanumeric data enclosed in 
quotation marks. 


Variable names are programmer-supplied names that specify locations 
in storage where data values may be stored. Numeric variable names 
represent numbers. String variables contain alphanumeric values and 
their names are distinguished from numeric variable names by the sym- 
bol $. 


. What is a BASIC program? 
. What are the two components of a BASIC instruction? 
. What are the two main uses for line numbers? 


. What is the advantage of incrementing line numbers by 5 or 10 or 
more? 


. How would you correct the spelling error in this instruction (assume 
the ENTER key has been pressed.)? 


20 LET H$ = “GROS PAY IS” 


6. How would you correct this instruction so M = A + B (assume the 


ENTER key has been pressed.)? 
170 LETM =A=B 


. Which of these are illegal real numbers in BASIC? Why? 
a. 56— 
b. +0.246 
Cc. 3;102 
d. 57981 
. How does BASIC interpret these numbers? 
a. 78,436 
b, —4,529 


. Convert these numbers to exponential notation using the BASIC 
format: 
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10. 


11. 


fc tm 


14. 


a7; 


19. 
. Which of these is an illegal character string? 


459.2 

. 0.000297 

= 825137; 

. 4.47 X 10-3 


Convert these numbers from exponential notation to decimals: 
a. 7.24396E+03 

b. 1.99E—02 

c. 4.972 E+05 

d. 8.05 E—04 


Give the exponential power equivalent to these numbers using 
standard notation: 

a. 90206 

b. 23.785 

Ce 279210 

d. .00321 


aoxe 


. What is a constant? Name two types. 
. Which of these are invalid numeric constants? 


0.73 

1072— 
2.9171E—02 
. 5.346+05 
7,942 

.. +6029 


Which of these are invalid character string constants in an 
expression? 

a. BOWLING GREEN, OHIO 

besAPPER? 

G.. S7747" 

d.-“PIGKEE, DILL": 


> paoos 


. What is a variable? Name two types, and explain how they differ. 
16. 


Give the computer memory equivalent to these P.O. box 
components: 

a. P.O. box number 

b. box 

c. mail 


How many values can a memory location hold at one time? 


. Which of the following are illegal variable names, and why? 
ass 754 io 
b. D g. Z9 
C5: 5B“ h. Wx- 
d. H$ 1252 
e. M$ j. $F- 


When is it not necessary to enclose character strings within quotes? 


a. “353-1070” 
b. “APARTMENT #4” 
c. BANDY, NICK J. 
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‘3 Getting Started 
with BASIC Programming 


Objectives After reading this chapter, the student should be able to do the following: 
@ Use and understand the value of the REM statement. 
@ Understand and use the LET statement. 


@ Evaluate arithmetic expressions according to the hierarchy of 
operations. 


@ Understand and use the PRINT statement. 
Understand and use the END statement. 


Understand how to place multiple statements on the same physical 
line. 


Differentiate between syntax errors and logic errors and be able to 
debug simple program examples. 


Overview This chapter describes four elementary BASIC statements—REM, LET, 
PRINT, and END. The LET statement is used to input, or assign, data to 
variables and to perform arithmetic calculations. The PRINT statement 
allows the programmer to see the results of processing. Processing is 
stopped with the END statement. The REM statement is presented here 
to underscore the importance of program documentation. The chapter 
also will discuss how to place multiple statements on the same physical 
line and introduce the debugging process. 


The REM Statement 


The remark (REM) statement provides information for the programmer or 
anyone else reading the program; it provides no information to the com- 
puter. The REM statement is used to document the program; the program- 
mer generally uses it to explain program segments, to define variables 
used within the program, or to note any special instructions. These state- 
ments can be placed anywhere throughout the program. 

The general format of the REM statement is this: 


line# REM comment 


Some example REM statements that could be used to document or ex- 
plain a program follow: 


This example illustrates the use of a REM statement to explain the pur- 
pose of a program. A REM statement such as this could be used anywhere 
in a program to explain the purpose of individual program segments. No- 
tice the asterisks that surround the descriptive statement. Many program- 
mers will use the asterisks (although any character could be used) to set 
off the REM statement from the other statements in a program. This tech- 
nique allows the REM statements to be easily identified when the pro- 
grammer is looking through long program listings. 

The following example illustrates the use of a REM statement to define 
a variable used within the program: 


It is a good practice to define the variables used in a program, especially if 
other people will be using it. 
It is possible to have a REM statement with no comment following it: 


In this case, the REM statement could be used to set off comments from 
executable statements and thus improve the readability of the program. 
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The purpose of the LET, or assignment, statement is to assign values to 
variables. It can be used to enter data into a program, as well as to process 
it. 
The general format of the LET statement is this: 
line# LET variable = expression 


The expression may be a constant, arithmetic formula or a variable. The 
following are examples: 


Statement Expression Type 
10 Numeric constant 
"BOB" Character string constant 
T Numeric variable 
BS String variable 
Bor aY Arithmetic formula 


The LET statement can be used to assign values to numeric or string 
variables directly or to assign the result of a calculation to a numeric vari- 
able. In either case, the value or calculated result of an expression on the 
right side of the equal sign is assigned to the variable on the left side. It is 
important to note that the statement is not evaluated in the same way as 
an algebraic expression. 

When BASIC assigns a value to a variable on the left side of the equa- 
tion, it really is putting that value in a storage location in memory labeled 
by that variable name. Since a storage location can only be represented by 
a variable name, only a variable can be on the left. 

The following examples of LET statements are presented along with a 
short description of how they are executed. 


LET Statement Computer Execution 


ANN Toor vu i 


signed to the location called X. 


ed fom and assigned to C. 


in quotes is placed into the 
string variable N$ (the quotes 
are not). 


of M, and the result is assigned 
to M. This result replaces 
whatever was in M previously. 
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LET Statement (continued) Computer Execution 
(COOLER Notic that this procedure of 
fectively counts how many 
times line 100 is executed. 
: the right of the equal sign is 
evaluated and assigned to A. 


This shorthand method can save both time and memory space. 


The arithmetic expression to 


Arithmetic Expressions 


In BASIC, arithmetic expressions are composed of constants, numeric vari- 
ables, and arithmetic operators. The arithmetic operators that can be used 
are the following: 


BASIC Arithmetic Arithmetic BASIC 
Operation Symbol Operation Example Arithmetic Expression 
oF Addition A+B Bote 
= Subtraction AaB ALC #B 
* Multiplication AXB A*B 
Division Ao A/B 
A or ** or f or[ Exponentiation AS A A BorA ** Bor 
AfBorA[B 


Some examples of valid expressions in LET statements follow: 


Again, some compilers and interpreters do not require the LET state- 
ment. If such is the case, all these statements could be written without 
using LET. 


Getting Started with BASIC Programming 37 


38 


or raising a number to a power. For example, A? is the same as A 


In an addition operation such as 


the value in the memory location identified by the variable A is added 
to the value in the memory location identified by the variable B. The 
result then is placed in the memory location identified by the variable X. 
For example, if A equals 5 and B equals 3, the computer would add 5 + 3 
and place the result, 8, into the storage location identified by X. 

For the example X = A — B, the same steps occur except that the value 
stored in B is subtracted from the value stored in A. 

The multiplication operator («) is used in multiplying two values. For 
example, 


X=A*B 


multiplies the value in the memory location identified by A by the value 
in the memory location identified by B and places the product in the mem- 
ory location identified by X. 

The division operator (/) is used in dividing two values. For example, 


X =A/B 


divides the value in the storage location A by the value in the storage 
location B and places the result in the storage location identified by X. 

The result or product of an arithmetic operation can be used in subse- 
quent calculations; for example, 


Decimal points within numbers are automatically aligned by the BASIC 
interpreter before an arithmetic operation takes place. 
The last arithmetic operation we will talk about here is exponentiation, 


X would be cubed (X « X « X), and the result would be stored in the storage 
location identified by Y. 
Examples using the operators «+, t, and [ follow: 


In the examples above you will notice that we have left a space on each 
side of the operational symbol. This spacing is not necessary, however it 
greatly improves the readability of the program. 
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Hierarchy of Operations 


When more than one operation is to be performed within an arithmetic 
expression, the computer follows a hierarchy, or priority, of operations. 
When parentheses are present in an expression, the operation within the 
parentheses is performed first. If parentheses are nested, the operation in 
the innermost set of parentheses is performed first. Thus, in the expres- 
sion 


(5 *CY tied) 1S. 120 se 10 


the first operation to be performed is to add 2 to the value in Y. 
Parentheses aside, operations are performed according to the following 
rules of priority: 


Priority Operation Symbol 

First Exponentiation A or ** or f or [ 
Second Multiplication or division * or / 
Third Addition or subtraction One 


Operations with high priority are performed before operations with lower 
priority (subject to our discussion on parentheses). If more than one opera- 
tion is to be performed at the same level, for example, 


the computer evaluates them from left to right. In this example, the 4 
would be raised to the second power and then the result, 16, raised to the 
third power. The answer is 4,096. 

The following are examples of these hierarchical rules: 


Expression Computer Evaluation 


Expression 1 


pS as 2 ea 

First: 2 * 5 = 10 Multiplication has a higher priority 
than addition, so it is done first. 

Second: 10 +1 = 11 Then the addition is done. The result 
is 11. 

Expression 2 

2*(5 +1) 

First: (5 + 1)=6 In this case, the addition must be done 
first, because it is enclosed in 
parentheses. 

Second: 2 * 6 = 12 The result is multiplied by 2. Compare 


this result with the result in 
Expression 1. 
(Continued on next page) 
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Expression 3 
2A3/4-2 
First:2 \ 3 = 8 


Second: 8 / 4 = 2 
Third:2 —-2=0 
Expression 4 


4*5+1/7*21 
First: 4 * 5 = 20 


Second: 1 / 7 = 0.142857 
Third: 0.142857 * 21 = 3 
Fourth: 20 + 3 = 23 


Expression 5 
4*6/(2/A 3) 
First: (2 A 3) = 8 


Second: 4 * 6 = 24 


Third: 24/8 =3 


Assigning Character Strings 


Computer Evaluation 


The priority order tells the computer to 
start with exponentiation. 


Next is division. 


Last, the subtraction is done. The 
result is 0. 


There are three operations at the same 
level: *, /, and *. They are performed 
from left to right. Last, the addition 

is done, the result is 23. 


The exponentiation is done first, 
because it is enclosed in parentheses. 


Next, the priority order tells the 
computer to do the multiplication. 


Last, the division is done. The result 
iso: 


The LET statement also can be used to assign a character string value to a 
string name. A character string is composed of alphanumeric data enclosed 


in quotes. For example, 


The following examples show valid and invalid LET statements: 


Valid Invalid and Why 


COLLETTA COONONLENNENANGNENA only a variable can appear 


on the left side of the equal 
sign) 


assigned to a string 
variable) 
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part of ‘an arithmetic 
expression) 


Figure 3-1, which calculates average monthly utility bills, illustrates 
several uses of the LET statement. The logic in this program is straightfor- 
ward: First, enter the total amount spent on utilities for the year; second, 
calculate the monthly average; and third, print the results. 

Line 110 is a LET statement used to enter the total amount spent on 
utilities for the year, $1,536.36, into the numeric variable T. The expres- 
sion in line 115 calculates the monthly average—that is, the total amount 
spent on utilities for the year divided by 12, the number of months in a 
year. Line 120 assigns a character string to the string variable name B$. 
The character string and the results of the calculation are printed by line 
125; 


Figure 3-1 AVERAGE MONTHLY UTILITY BILL PROGRAM 


00100 REM *** THIS PROGRAM CALCULATES THE AVERAGE *** 
00105 REM *** MONTHLY UTILITY BILL *** 


00125 PRINT B$;M 
00999 END 
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Bunys sajoeseyo 
fs) 


BE: | 
and 


W3¥Y 
suomsuy 


KATH 


The PRINT Statement 


LEARNING CHECK 


. The statement that is used to document a program is called the 
statement. 
. AREM statement can be used anywhere in a program. TRUE FALSE (Circle the 
correct answer.) 
. The _______ statement assigns values to variables. 
. Which of the following is the correct hierarchy of operations? 
. Exponentiation, parentheses, multiplication or division, addition or sub- 
traction. 


. Parentheses, multiplication or division, exponentiation, addition or sub- 
traction. 

. Parentheses, exponentiation, division or multiplication, addition or sub- 
traction. 

| None of the above. 


is composed of alphanumeric data enclosed within quotation 


The PRINT statement is used to print or display the results of computer 
processing. It also permits the formatting, or arranging, of output. The gen- 
eral form of the PRINT statement is as follows: 


Variables 

Literals 

Arithmetic expressions 
Combination of above 


line# PRINT 


PRINT statements can take several forms, depending on the output re- 
quired. Let us look at some examples. 


Printing the Values of Variables 


We can tell the computer to print values assigned to storage locations by 
simply using the keyword PRINT with the variable names after it, sepa- 
rated by commas: 


The comma is used to separate one variable from another; it also is used 
for carriage control (more on this in the next chapter). 


Complete BASIC Programming 


Printing has no effect on the contents of storage. The PRINT statement 

is a simple reading of the value of a variable that allows the user to see 

-what the contents are. Normally, each time the computer encounters a 

PRINT statement, it begins printing output on a new line. Exceptions to 
this are discussed in chapter 4. 


For example, the state- 
ment 


would be written 


Printing Literals 


A literal is an expression consisting of alphabetic, numeric, or special 
characters or a combination of all three. The following are examples of 
literals: 


Xx 3 T3 
Y 126.78 B$ 
Character Strings 


A character string literal is a group of letters, numbers, or special charac- 
ters that you want printed on the output page. To have that done, enclose 
the group in quotation marks (‘‘). Whatever is inside the quotation marks is 
printed exactly as it is; for example, 


would appear on the output page as 


@#$%Z&SAMPLE 


To print column headings, put each heading in quotes and separate 
each group by a comma. The comma instructs the printer to skip to the 
next print zone (more on this in Chapter 4). An example follows: 


When line 40 is executed, the character strings are printed out exactly as 
typed except that the quotation marks do not appear: 


NAME RANK SERIAL NO. 
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Numeric Literals 


Numeric literals do not have to be enclosed in quotation marks to be print- 
ed. For example, the statement 


will print the following result: 


67 


Printing the Values of Expressions 


The computer can print not only the values of literals and the values of 
variables, but also the values of arithmetic expressions: 


First, the computer evaluates the highlighted expression according to the 
rules of priority. The result is printed as follows: 


1.619433 


If the value of the expression is extremely large or extremely small, the 
computer may print it in exponential notation. 

Figure 3-2 deals with expressions in both decimal and exponential 
forms. When the PRINT statement in line 25 is executed, the three expres- 
sions are evaluated and their values printed. Notice that the first two num- 
bers are too large to be printed conventionally and are printed instead in 
exponential notation. 


Printing Blank Lines 


A PRINT statement with nothing typed after it will provide a blank line of 
output. For example, 


To skip more than one line, simply include more than one of these PRINT 
statements: 


For exam- 
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Figure 3-2 NUMERIC OUTPUT 


Assign 
Values to 
Variables 


Print 
Results 


00010 LET A 653212 
00015 LET B 345612345 
00020 LET C 0.0001876 


00999 END 
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The END Statement 


The END statement indicates the end of the program and so must be as- 
signed the highest line number in the program. The general format of the 
END statement is this: 


line# END 


The use of an all-9s number for the END statement is a common pro- 
gramming practice, although it is not required. This convention serves as a 
reminder to the programmer to include the END statement and helps in- 
sure that it is positioned properly. See line 999 in the utility bill program 
for an example of an END statement. 


Multiple Statements on a Single Physical Line 


vA 2 physical lin 2. For ex- 
‘ample, if we wanted to skip two lines, instead of using two physical lines 
as was illustrated previously, we could accomplish the same result more 
efficiently with the following line: 


es. For example, 


Debugging 

SESS... se ma eee ere IVA eR Ba 8 Ste ee 
Debugging is the process of determining the specific errors in your pro- 
gram and correcting them. Two types of errors can occur: syntax errors 
and logic errors. Syntax errors are the results of improper use of the pro- 
gramming language. Logic errors occur because the logic that was desig- 
nated would not process the data in the desired manner. Syntax errors are 
easy to find , because the interpreter or compiler does this for you. Logic 
errors, in contrast, can be very difficult to find or even identify. As a note 
of caution, remember that a program with a logic error may run and give 
results that appear to be correct but are not. Programs should be thorough- 
ly tested to insure that the logic is correct. Detailed documentation should 
be included in the program to assist in any debugging that may be neces- 
sary. 

Debugging exercises will be included after this and each subsequent 

chapter to help you learn to recognize and correct any errors you may 
encounter. 
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LEARNING CHECK 


- A(n) —_______ statement is used to print or display the results of computer 
processing. 

. When a PRINT statement is executed, the contents of memory are changed. 
TRUE FALSE (Circle the correct answer.) 

. A(n) —___ is an expression consisting of alphabetic, numeric, or special 
characters or a combination of all three. 


. Which of the following are valid PRINT statements? 
. 10 PRINT 25 
. 100 PRINT “ANYTHING” 
. 30 PRINTA*B+C 


ON3 ‘S 
2 pue ‘q'e “p | 50 PRINT TOTAL PRICE 
jes9y| “€ . none of the above 
asjey “% indi 
ina statement indicates the end of a program. 
siamsuy 


A Programming Problem 


Problem Definition 
A local stereo shop was advertising the following discounts: 


= 5 percent off the purchase of a receiver and a pair of speakers 


= 20 percent off the purchase of a receiver, pair of speakers, and a turn- 
table 


m 40 percent off the purchase of a receiver, pair of speakers, turntable, and 
cassette deck 


Being a small shop, it only carries one model of each item. The price for 
each is as follows: 


Item Price 

Receiver $423.00 
Pair of speakers $300.00 
Turntable $185.00 
Cassette deck $210.00 


Before going to the stereo shop, you decide to write a program to tell you 
the discounted price of each of the advertised options (see Figure 3-3). 
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Figure 3-3 STEREO DISCOUNT PROGRAM AND FLOWCHART 
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Summary 


Solution Design 


The first step in the program is to enter the price of each component. Next, 
determine the discount price for each option by adding the total price of 
the items in an option and multiplying by the appropriate discount factor. 
You will notice we multiplied by 0.95, 0.8, and 0.6 for the respective op- 
tions instead of 0.05 0.20, and 0.40. This is because we are interested in 
what we have to pay rather than the discount amount itself. Finally, we 
print out the results. 


The Program 


Figure 3-3 shows a listing and output of the program, as well as a flow- 
chart. The REM statements in lines 10 through 55 document the purpose 
of the program and the meanings of the variables. The REM statement in 
line 60 is used to set off the remarks from the executable statements. Lines 
65 through 80 use LET statements to enter the price of each stereo compo- 
nent. Lines 85 through 95 calculate the discounted price for each option. 
The results are printed out in lines 100 through 110. 


= REM statements are used to document a program; they are not executed 
by the computer. 


= The purpose of the LET statement is to assign values to variables; LET is 
an optional keyword in some BASIC implementations. 


= The LET statement is not evaluated as an algebraic equation. The com- 
puter first evaluates the expression on the right side of the equal sign 
and then assigns that result to the variable on the left side of the equal 
sign. 


= Arithmetic expressions are evaluated according to the following hierar- 
chy of operations: (1) operations in parentheses, (2) exponentiation, (3) 
multiplication or division, and (4) addition or subtraction. Multiple op- 
erations at the same level are evaluated left to right. 


= The PRINT statement is used to print or display the results of process- 
ing. 


m= The END statement indicates the physical end of a program and stops 
execution. 


= Multiple statements may be placed on the same physical line by sepa- 
rating them with the backslash (\) character. 
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m The two types of errors that can occur in a program are syntax errors 
(improper use of the programming language) and logic errors (program 
logic that does not process data in the desired manner). 


m Debugging is the process of finding and correcting errors in a program. 


Review Questions 


1. What is the purpose of the REM statement? 


2. Why is it important to document your program using REM 
statements? 


3. What is the purpose of the LET statement? 
4. Explain how a LET statement is evaluated by the computer. 


5. Ina LET statement, what are the three forms that the expression on 
the right side of the equal sign may take? 


6. List the arithmetic operators used in BASIC, giving an example 
statement for each one. 


7. What hierarchy, or priority, of arithmetic operations does BASIC 
follow? 


8. Evaluate the expression 10 LET X = A/B*C A Y / 2 where A = 
24,B = 3,C = 2, and Y = 3. 

9. Evaluate the expression 10 LET M = (X + B* (2 A 5) — B* (4 + 
X)) / 2 where X = 8 and B = 2. 


10. In a LET statement, why can only a variable name be on the left side 
of the equal sign? 

11. Evaluate the expression 10 LET A = 2.5 + (X *(Y A 2)/C)*(8 + 
X) where X = 2, Y = 4, andC = 8. 

12. Identify which of the following are valid LET statements: 

10 LET X = “STACY” 

10 LETA/C=B 

10 LET T= P*Q 

10 LET Y =X + ZY 

10 LET M = X + (Y * Z) 

13. What is the purpose of the PRINT statement? 


14. What effect does the PRINT statement have on the contents of 
memory? 


s209 08 


15. Define a literal, and give three examples. 
16. Define a character string, and give three examples. 
17. How can a blank line be added to an output? More than one? 


18. What is the output of the following program segment? 
10 LET X = 952 
20 LET Y = 56 
30 PRINT 5.3 + X / (Y * 10) 
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19. What is the purpose of the END statement? 


20. Identify which of the following statements are invalid, and tell why: 
10 LET P = 5 * (A + B) 

10 PRINT TOTAL PRICE = 

10 LET N = “NAN” 


Debugging Exercises 


pao oe 


. 10LETN=N+M 


10 LET X = 5 + P$ 


Identify the following programs or program segments that contain errors, 
and debug them. 


1. 


00010 
00015 
00020 
00025 
00030 
00035 
00999 


00040 
00045 
00050 
00055 


00030 
00035 
00040 
00045 


00010 
00015 
00020 
00099 


00010 
00015 
00020 
00025 
00030 
00035 
00999 


00100 
00105 
00110 
00115 
00120 
00125 
00999 


REM *** THIS PROGRAM PRINTS *** 

A NAME AND AGE OF A PERSON *¥#*® “> 
REM 

LET A = 21 

LET N$ = "STACY" 

PRINT N$,A 

END 

LET X 


= 15.5 P 
LET K = "DISTANCE IN KILOMETERS ="3X >> 


UE 2¥ om (Boe GZ 

LET M = “DISTANCE IN MILES =";Y pv: 
Sats 
Y = B» 
LET N$ = 54 
PRINT N$,A,B 


m 
ae | 
~< 
2 


LET A = 2 

LET B = 4 

PRINT A *® B / 2 
END 


REM *** THIS PROGRAM CALCULATES *** 
REM *** AN AVERAGE OF TWO NUMBERS *** 
LET 10 =A 

LET 20 = B 
LET xX =(A + B)/ 2 
PRINT X 

END 


REM *** THIS PROGRAM: FINDS *** 
REM *** THE CUBE OF A NUMBER *** 
REM 

LET X = 5 
LET C$ = 
PRINT C$ 
END 


> eee) 
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7. 00050 LET N$ = NANCY 
00055 LET L$ = LINDA’ 
00060 PRINT N$,L$ 
00099 END 


vii 8. 00010 THIS PROGRAM PRINTS Renn 
00015 THE HEADING FOR A REPORT nt 
00020 PRINT*PROJECTED 1984 BUDGET > 
00025 PRINT*FOR ACME PRODUCTS INC. 
00999 END 


9. 00020 REM *** THIS PROGRAM CALCULATES *** 
00025 REM *** BATTING AVERAGES *** 
00030 REM *** B = TIMES AT BAT *#* 
00035 REM *** H = # OF HITS ##* 
00040 REM *** A BATTING AVERAGE *** 
00045 LET B = 1 
00050 LET H$ = "41" 
00055 LET A = H$ / B * 1000 
00060 PRINT“BATTING AVG" =,A 
00999 END 


10. 00015 PRINT 62 
00020 LET X = A * 3 
00025 LET N$ = B + X 
00030 PRINT NS 
00999 END 


Additional Programming Problems 


1. Using the formula C = 5/9(F — 32), where C equals the degrees 
centigrade and F equals the degrees Fahrenheit, write a program that 
will convert 85° F to its centigrade equivalent. Include REM 
statements to document your program. 


2. You own a house with fifteen identically shaped rooms that need 
carpeting. Each room has a length of twelve feet and a width of nine 
feet. The carpeting you choose is $9.50 a square foot. Write a program 
that will calculate the amount of carpeting needed, as well as the 
total cost of the carpeting. Your output should include both figures. 
The area of a room is equal to the length of the room multiplied by 
the width of the room. Document your program using REM 
statements. 


3. Write a program that will print out the name and telephone number 
of the following persons: 


Linda Zadel 888-1111 
Anne Tate 223-3165 
Corky Strong 444-6537 
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Use the LET statement to enter the data. The output should have the 
following format: 


NAME TELEPHONE # 


XXXX XXX-XXXX 


. The list price of a record you want is $8.98. A sign in the window 
says that all $8.98 LPs are on sale for 15 percent off the list price. 
Write a program that will calculate the sale price of the record using 
the list price of $8.98 and the 15 percent discount. 


. Billy Boy Brandon wants to know how much gas it would cost him to 
drive to Fort Lauderdale, Florida, and back home. Fort Lauderdale is 
2,340 miles from his home. His car gets twenty-eight miles per gallon, 
and he figures that gas would cost $1.21 per gallon. Your output from 
this program should have the following format: 


DISTANCE TOTAL COST 
XXXX $XXX.XX 


. You have been asked to prepare a report listing the names and scores 
for the finalists in the annual Acapulco Cliff Diving Championship as 
well as the average for each diver. Each participant made three dives 
and was scored on a ten-point scale. The input data follows. The 
average score is calculated by adding the three scores and dividing by 
three. The report should contain report and column headings and use 
REM statements to document it. 


DIVER Dive #1 Dive #2 Dive #3 
Vic Flynn 9.5 9.6 9.3 
Karen McKee 8.3 8.5 9.0 


Getting Started with BASIC Programming 


53 


Outline 


Objectives 

Overview 

The INPUT Statement 
Prompts 


The READ and DATA 
Statements 


Comparison of the Three 
Methods of Data Entry 


Learning Check 


Printing Punctuation 


Print Zones and Commas 
Skipping Print Zones 
Ending with a Comma 


Using Semicolons 
Semicolons and 
Character Strings 
Ending with a 
Semicolon 


The TAB Function 
The PRINT USING Statement 


Box: Format Control Characters 
for IBM and TRS-80 


Learning Check 


A Programming Problem 


Problem Definition Summary 
Solution Design 
The Program Review Questions 


Debugging Exercises 


Additional Programming 
Problems 


Overview 


After reading this chapter, the student should be able to do the following: 


@ Understand and use the INPUT statement to enter data into a 
program. 


@ Understand and use the READ and DATA statements to enter data 
into a program. 


| i ola and use commas and semicolons to control the spacing of 
output. 


@ Understand and use the TAB statement for controlling output. 


@ Understand and use the PRINT USING statement to format output. 


This chapter will introduce new ways of entering data into a program. 
Although the LET statement can be used to enter small amounts of data, 
the INPUT statement and the READ/DATA statements are the most 
commonly used methods. The INPUT statement allows the user to put 
data into the computer as the program is running. The program can be 
written to ask the user for the data it needs. The READ/DATA 
statements are much more efficient than the LET statement when 
working with large amounts of data or data that may change frequently. 

When programming, it is often necessary to have organized and 
formatted output. This yields a better appearance and readability. We 
will show you how to produce output with headings, columns, and 
appropriate spacing. 

Figure 4-1 is a sample of the type of output you will be able to 
produce with the tools in this chapter. It also makes use of the INPUT 
statement. 


Figure 4-1 FORMATTED OUTPUT 


The INPUT Statement 


The INPUT statement is used for inquiry and response when a user appli- 

cation calls for a question-and-answer environment. The last chapter ex- 

plained how the LET statement can be used to enter data values into a 

program. The INPUT statement differs from the LET statement in that it 

allows the user to enter data at the terminal while the program is running. 
The general format of the INPUT statement is as follows: 


line# INPUT variable list 


For example, 


These also could be combined into one line as follows: 


or they could be on separate lines: 


The variables listed in the INPUT statements may be string or numeric. 
Just be sure to enter the correct value to be assigned to each variable. In 
other words, the type of data must be the same as that designated by the 
variable. 

INPUT statements are placed where data values are needed in a pro- 
gram. This is determined by the logic of the program. After the program 
has been keyed in, the user types the execution command RUNNH on the 
DECSYSTEM 20; the computer then starts to execute the program. When- 
ever the computer reaches an INPUT statement, it stops, prints a question 
mark at the terminal, and waits for the user to enter data. After typing in 
the data, the user presses the RETURN key. The computer then assigns 
the data value to the variable indicated in the INPUT statement and re- 
sumes processing. More than one variable can be listed in the INPUT 
statement; the user must know how many values to enter. When there are 
not enough data entered, an error message is printed, telling the user there 
is insufficient data. For example, when line 140 is executed with only one 
value entered, the result would look like this: 


RUNNH 
2228.5 


2? 59 Insufficient data at line 00140 of MAIN PROGRAM 
? 
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Prompts 


TAF FT Se STATE TTT TTT ITT 


If the user knew what entries to make and how many, the output would 
look like this: 


RUNNH 
? 28.5,25,10 


The variable L would have the value 28.5, W would be assigned the value 
25, and H would contain 10. As you can see, the INPUT statement offers a 
great deal of flexibility. Each time the program is executed, new values 
can be entered without changing any program statements. 


The INPUT statement is usually preceded by a PRINT statement. This 
PRINT statement is referred to as a prompt. Since the INPUT statement 
signals the need for data with only a question mark, it is good program- 
ming to precede each INPUT statement with a PRINT statement that ex- 
plains to the user what data is to be entered. This practice is particularly 
important in a BASIC program that contains numerous INPUT statements; 
otherwise, when users see only a question mark requesting data, they may 
not know what data values are to be entered and in what order. 

Figure 4-2 is a program with a prompt that calculates the volume of a 
swimming pool. Line 135 and 140 cause the program to be executed in a 
question-and-answer mode (also called inquiry-and-response, or conver- 
sational mode). When the program is run, line 135 causes the computer to 
print a message at the terminal that says, “ENTER, LENGTH, WIDTH, 
AND DEPTH”. A question mark then appears to signal the user that the 
data values are to be entered. At this point, the user types in the requested 
data values, separating them with commas, and then presses the RETURN 
key to continue execution of the program: 


RUNNH 
ENTER LENGHT,WIDTH,AND DEPTH <«-Program Prompt 

? 28.5,25,10 <Computer Prompt (?), User Data Entry 
VOLUME = 7125 «Computer Continues Execution after User 


Pushes RETURN 


Most computers permit the prompt to be an integral part of the INPUT 
statement. For example, the following line could be substituted for lines 
135 and 140 in the volume program: 


When the program is run with this new line, the question mark appears 
immediately after the prompt, and no separate PRINT statement for the 
prompt is needed: 


RUNNH 
ENTER LENGHT,WIDTH,AND DEPTH ? 20,18,6 
VOLUME = 2160 
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Figure 4-2. SWIMMING POOL VOLUME PROGRAM 
USING A PROMPT AND AN INPUT STATEMENT 


ENGHT,WIDTH,AND DEPTH" 


j ENTER LENGHT,WIDTH,AND DEPTH 


me 20? «O28. 2 
Mee VOLUME = 7125 


The READ and DATA Statements 


The READ and DATA statements provide another way to enter data into a 
BASIC program. These two statements always work together. Values con- 
tained in the DATA statements are assigned to variables listed in the 
READ statements. 

The general format of the READ and DATA statements is this: 


line# READ variable list 
line# DATA variable list 
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Here are some examples of READ and DATA statements: 


Re Oe: 


JILL", "PROGRAMMER" 


bas 00 READ Xs¥ 
200 RE 


This method of entering data into a program works a little differently 
than the INPUT statement. The READ statement tells the computer to 
search through the BASIC program until it finds the first DATA statement. 
The computer then assigns the data values consecutively to the variables 
in the READ statement. Each READ statement causes as many values to be 
taken from the data list as there are variables in the READ variable list. 
Figure 4-3 illustrates this process of assigning values from the data list to 


variables. : 
amed X. (Anything that was 


Figure 4-3. READ/DATA EXAMPLE 


ogee Po H*R 
00025 PRINT NS,P 
00035 LETP =H*R 


00040 PRINT NS,P 
DAT 6 i ccbigh. >) lallalaata 
gs I a 
Calculate (00999 END 
Gross Pay 


Calculate 
Gross Pay 


| 
@; MARVIN ZIGLER 240 


Print 
Results 
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previously in storage location X is destroyed when the new information is 
put in X.) Then take the next value from the data list and assign it to 
variable N$ (which also destroys anything that was previously in location 
N$).”’ After statement 10 has been executed, the number 30262 is in stor- 
age location X, and the character string MARVIN ZIGLER is in storage 
location N$. This leaves the number 40 at the top of the data list. 

The same process occurs when the computer encounters statement 15. 
The data from the top of the list (40) is placed in storage location H. The 
number 6.00 is assigned to R. 

When statement 30 is executed, the number at the top of the data list 
(28966) is assigned to the variable X. The number 30262, which was as- 
signed to X by statement 10, is replaced by the new value. In the same 
manner, the character string JOHN ALLEN is assigned to the variable N$; 
the number 40 is assigned to the variable H; and the number 6.35 is as- 
signed to R. When these values are assigned, the values previously stored 
in the variables are destroyed. 

This process illustrates the basic concept of nondestructive read, de- 
structive write. Once the data items have been assigned to storage loca- 
tions, they remain there until new data items are recorded over them. 
Thus, all four variables represent more than one value during execution, 
but never more than one at a time. 


e message points out the line number of the READ statement 
in error; for example, if line 30 were such a READ statement, the computer 
would print the following: 


27.57 End of DATA found at line 00030 of MAIN PROGRAM 


READ statements, like INPUT, are located wherever the logic of the 
program indicates the need for data. DATA statements, however, are non- 
executable and may be located anywhere in the program. Although DATA 
statements may be anywhere in a program, it is common practice to group 
them together either at the beginning or the end of a program. This makes 
debugging easier. The BASIC interpreter or compiler simply takes all the 
data items in all the DATA statements and forms one combined data list, 
ordering the DATA statements from lowest line number to highest and 
then using the data from left to right. For example, the following three 
program segments look different, but the data lists they produce are alike: 


DATA Statements DATA List 
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Note that when two or more data values occupy a line, they are sepa- 
rated by commas. Character strings may or may not be enclosed in quota- 
tion marks in DATA statements. However, if the character strings are to 
contain leading or trailing blanks, commas, and/or semicolons, they must 
be enclosed in quotation marks. 

We would assign the previous data items in the following manner: 


It does not matter in this example how many READ or DATA statements 
are used. However, the order of the variables and values is important. 
Make sure that the arrangement of values in the DATA statements corre- 
spond to the data required in the READ statements—that is, that character 
strings are assigned to string variables and numeric constants, to numeric 
variables. 

Let us return to the swimming pool volume program and change it to 
use READ/DATA (see Figure 4-4). Lines 135 and 140 perform the same 
function as the INPUT statement did previously. With INPUT, the data 
values are assigned by the user as the program is running. With READ/ 
DATA, on the other hand, the length, width, and depth values already are 
contained in program line 135, the DATA statement. If we wanted to run 
this program again using different data, we would have to change the 
DATA statement. 


Comparison of the Three Methods of Data Entry 


LET, INPUT, and READ/DATA all can be used to enter data into BASIC 
programs. You may wonder, then, which command is best to use. That 
depends on the particular application. Here are some general guidelines: 


1. When the data to be used by a program are constant, use the LET 
statement. The LET statement is often used to assign a beginning 
value to a variable; this is called initialization. For example; 


2. The INPUT statement is used when a question-and-answer mode is 
desired. It is also a good method to use when data values are likely to 
change frequently. A good application for the use of the INPUT 
statement might be entering data about hospital patients—a situation 
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Figure 4-4 SWIMMING POOL VOLUME PROGRAM USING READ/DATA 
STATEMENTS 


00130 REM *** SWIMMING POOL VOLUME *** 


00145 LET Vv = t * Ww * D 
00150 PRINT "VOLUME =";V 
00999 END 
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in which people are checking in and out every day, and data about a 
particular patient changes frequently. 

3. When many data values must be entered, READ/DATA statements 
are a good option. These statements often are used to read data into 
arrays (to be discussed in Chapter 9). 


LEARNING CHECK 


’ 


‘ Thesmput _ statement allows the user to enter data at the terminal while the 
program is running. 

. Only one variable can be listed in the INPUT statement. TRUE FALSE (Circle the 
correct answer.) 

. APRINT statement that explains to the user what data is to be entered into the 
program is called a(n) pre“ © 

. Values contained in _teud statements are assigned to variables listed in 
Data _ statements. 

. Using the following program, what values will be printed for N$, Z? 


READ N$,X,Y 


READ N$ 
LET Z =X -+ 4 
READ X,Z 
PRINT N$,Z 
DATA "DANIEL",4,7,"JERRY",9,100 
cor nar aes 
GV3uY ‘VIVO “Py ‘ 
duboadl'¢ 999 END 
asjey “% 
LAdNI “4 
siomsuy 


Printing Punctuation 


Chapter 3 explained that the PRINT statement lets us get the results of 
processing printed. When more than one item is to be printed on a line, 
commas and semicolons can be used to control the spacing of the output. 


Print Zones and Commas 


: : On some terminals, such as the DEC VT-100 used with the 
DECSYSTEM 20 computer, each output line consists of eighty print posi- 
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tions. The line is divided into five print zones, each fourteen characters 
wide. The beginning columns of the five print zones are shown here: 


ZONE1 ZONE2 ZONE3 ZONE4 ZONE5 
COL COL COL COL COL 
1 15 29 43 57 


When the computer encounters the PRINT statement in this program 
segment: 


the value in A, which is 20, will be printed starting in the first print zone. 
Since 20 is a positive number, most computers will leave a blank before 
the number for the sign. Of course, if the value in A were negative, the 
minus sign would be printed starting in column 1. The comma between A 
and M$ tells the computer to space over to the next zone and print the 
value contained in M$. After PINK is printed, the comma directs the com- 
puter to space over to the third print zone and print the value in L$. The 
output is as follows: 


Zone 1 Zone 2 Zone 3 
RUNNH 
20 PINK GRAPEFRUIT 


If there are more items listed in a PRINT statement than there are print 
zones, the computer starts printing in the first zone of the next line. If the 
value to be printed exceeds the width of the print zone, the computer will 
completely print out the value, even though part of it goes into the next 
print zone. The comma then directs printing to start in the following print 
zone. Take a look at the following example and note where the value of P$ 
(49) is printed: 


RUNNH 

PINK GRAPEFRUITS ARE ON SALE FOR 49 

t t t t 
Zone 1 Zone 2 Zone 3 Zone 4 


number of columns and rows on the CRT screen. Columns 4 and 5 give the 
number of print zones (when commas are used as spacing control in 
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ETT PRS TTT 


Table 4-1 COMPUTER DISPLAY CHARACTERISTICS 


Number 


of Digits 
Screen Screen Number Space Printed, 
Width Height of Print Zone for Space Single 
Computer (Characters) (Lines) Zones Width Sign? Following? Precision 


DECSYSTEM 20 *80/132 *24/16 *5/9 14 Yes Yes 7 
Apple 40 24 2.5 16 No No 9 
IBM/Microsoft 80 24 5 14 Yes Yes 7 
TRS-80 *64/32 15 *4/2 16 Yes Yes 6 
PET/Commodore 64 40 25 4 10 Yes Yes 9 
See example 
below 


*(Slash indicates both options are available to user.) 


Example: With the Apple computer, the statement 


10 PRINT —2;—1;0;1;2 
would print 
—2—1012 (no spaces) 


With the DECSYSTEM 20, IBM/Microsoft, TRS-80, and PET/Commodore 64 computers, the same 
statement would print 


ee Or2 


PRINT statements) and print zone widths. Columns 6 and 7 indicate 
whether a space is always left in front of a number for a positive or nega- 
tive sign and whether a space follows a number for ease in reading. Final- 
ly, column 8 gives the maximum number of digits output to the screen. If 
the number to be printed contains more characters than that listed, all 
remaining characters will be truncated—the number will not be rounded. 


Skipping Print Zones 


A print zone can be skipped by the use of a technique that involves enclos- 
ing a space (the character blank) in quotation marks. This causes the entire 
zone to appear empty: 
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Both of these techniques cause the literal “COURSE” to be printed in zone 
1, the second zone to be blank, and the literal “COURSE NUMBER” to be 
printed in the third zone: 


Zone 1 Zone 3 
RUNNH 
COURSE COURSE NUMBER 


Ending with a Comma 


As mentioned earlier, output generated by a PRINT statement normally. 
begins in the first zone of a new line. However, if the previously executed 
PRINT statement ends with a comma, the output of a PRINT statement 
starts in the next available zone. Thus, the statements 


produce the following output: 


RUNNH 
20 PINK GRAPEFRUIT PLEASE 


Using Semicolons 


Using a semicolon instead of a comma causes output to be packed more 
closely on a line. This alternative gives the programmer greater flexibility 
in formatting output. In the following examples, notice the difference in 
spacing when semicolons are used instead of commas: 


Using Commas 
RUNNH 
100 -200 300 
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Using Semicolons 


RUNNH 
100 -200 300 


The semicolon between the items tells the computer to skip to the next 
column to print the next item—not to the next print zone, as with the 
comma. Generally, when the number is positive, a space is left in front of 
the number for the sign. 


Semicolons and Character Strings 


The following example shows what happens when semicolons are used 
with character strings: 


RUNNH 
JASONJACKSON 


Since letters do not have signs, they are run together. The best way to 
avoid this problem is to enclose a space within the quotes: 


RUNNH 
JASON JACKSON 


When printing character strings after numbers, it may also be necessary to 
enclose a leading space within quotes: 


RUNNH 
495207 JASON JACKSON 


Ending with a Semicolon 


If the semicolon is the last character of the PRINT statement, carriage 
control is not advanced when the printing of the statement is completed; 
therefore, the output generated by the next PRINT statement continues on 
the same line, for example, 


RUNNH 
495207 JASON \JACKSON 


Line 60 causes 495207 to be printed out. The semicolon after this number 
keeps the printer on the same line; then, when line 70 is encountered, 
JASON JACKSON is printed on the same line. 
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The comma causes the results of processing to be printed according to 
predefined print zones. The semicolon causes them to start printing in the 
next position on the output line. Both are easy to use, and many reports 
can be formatted in this fashion. However, there are times when a report 
should be structured differently. 

The TAB function allows output to be printed in any column in an 
output line, providing the programmer greater flexibility to format printed 
output. 

The general format of the TAB function is this: 


TAB(expression) 


The expression in parentheses may be a numeric constant, variable, or 
arithmetic expression; it tells the computer the column in which printing 
is to occur. The TAB function (as used in a PRINT statement) must imme- 
diately precede the variable or literal to be printed out. For example, the 
statement 


causes the printer to be spaced to column 10 (indicated in parentheses) 
and to print the value stored in A$. The printer then spaces over to column 
25, as indicated in the next parentheses, and prints the value in B. 


The program in 


Figure 4-5 illustrates the use of the TAB function. 
Note that we have used the semicolon as the punctuation mark with the 
TAB function. The semicolon separates the expression from the values to 
be printed. If commas were used instead, the printer would default and 
use the predefined print zones, ignoring the columns specified in paren- 
theses. For example, if line 120 of the program in Figure 4-5 had been 


the output would have been 


RUNNH 
INVENTORY REPORT 
ITEM QUANTITY 
PENCILS 1000 
ERASERS 200 
PAPER 500 
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Figure 4-5 INVENTORY PROGRAM 


REM *** |NVENTORY REPORT *** 
REM 
PRINT TAB(10);"INVENTORY REPORT" 
PRINT 
) PRINT TAB(5);"ITEM"; TAB(25); "QUANTITY" 
PRINT 
READ 1$,Q 
PRINT TAB(5);1$;TAB(25);Q 
READ 1$,Q 
PRINT TAB(5);1$;TAB(25);Q 
READ 1$,Q 
PRINT TAB(5);1$;TAB(25);Q 
DATA "PENCILS",1000,"ERASERS",200,"PAPER",500 
END 


e| i ) 
| 
; INVENTORY REPORT to 
| 
ITEM QUANTITY 


PENCILS 1000 
PAPER 500 


_ MICROCOMPUTERS NOTE: See Appendix B for differences in 


Apple: No differences. J 
IBM/Microsoft: No differences. ‘seagpess pee — ooo and when us- 
PET/Commodore 64: No differences. 

TRS-80: No differences. 


The computer spaced over the five columns indicated by the first TAB 
function, but when it saw the comma following the parentheses, it skipped 
over to the next predefined print zone to print ITEM. The same thing 
happens again with QUANTITY. Use semicolons rather than commas in 
PRINT statements containing the TAB function. 
When using the TAB function, iti is 
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as a variable with TA as its significant characters, and the value in paren- 
theses is taken as an array position. The following would be invalid where 
TAB( is recognized as the reserved word: 


As another caution, remember that when the TAB function is used, the 
printer cannot be backspaced. Once a column has been passed, the printer 
cannot go back to it. This means that if more than one TAB function is 
used in a PRINT statement, the column numbers in parentheses must 
increase from left to right. For example, 


Valid: 
(00020 PRINT TAB(5);3;TAB(15);4;TAB(25);5. 
RUNNH 
3 4 5 
Invalid: 
RUNNH 
Sc ao 
RUNNH 
A e5 5 


The first invalid example tells the computer to print the number 5 in 
column 25. The computer does this, but because the printer cannot back- 
space to column 15 and column 5, it prints the numbers 4 and 3 as it 
normally would using semicolons. 

The column number of the TAB function may be expressed as a numer- 
ic constant, a numeric variable, or a numeric expression. All previous 
examples have used numeric constants. The following are examples using 
the other two expressions: 


RUNNH 
7 SUEANN 


RUNNH 


7 SUEANN 
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Notice that both of these have the same output, but the first one uses 
numeric variables and the second uses numeric expressions. 


The PRINT USING Statement 


Another convenient feature for controlling output is the PRINT USING 
statement; with it, the programmer can av id print z restrictions and 
can “dress up” the output. P ; on of the A 


d This section briefly describes its use on the 
DECSYSTEM 20 computer; the principles should be similar for other com- 
puters with this feature. Many microcomputers do not have a PRINT US- 
ING capability: The Apple and PET/Commodore 64 do not; the IBM/Mi- 
crosoft and TRS-80 do. The general format of the PRINT USING statement 
is as follows: 


line# PRINT USING image statement line#, expression-list 


The PRINT USING statement tells which statement in the program has 

the print line image and what values are to be used in that print line. The 
expression list consists of a sequence of variables or expressions separated 
by commas; it is similar to the expression list in any PRINT statement. The 
line number of the image statement is the number of the BASIC statement 

| that tells the computer how to print the items in the expression list. 

| The image statement is denoted by a colon (:) following the line num- 

ber: 


line#: format control characters 


It is a nonexecutable statement, like DATA, and it can be placed anywhere 

in the program. The PRINT USING command, however, is placed where 

the logic demands. A single image statement can be referred to by several 

PRINT USING statements. Special format control characters are used in 

the image statement to describe the output image and to control spacing. 
| The major DECSYSTEM 20 formal control characters are listed in the 
following table. (a mask specifies the maximum number of characters to 
be printed in one field): 


Format 
Control Character Control Image for Example 
# Numeric data; used in a mask; one sym- ### 
bol for each number to be printed; pads 
zeros to the left of the decimal point 
$ Dollar sign; printed exactly as is $H#Ht 
$$ Causes dollar sign to be printed immedi- $$##.## 
ately before first digit 
at Leading asterisks; printed in place of **###.# 


blanks or spaces (Table continued next page) 
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Format 


Control Character Control Image for Example 
Decimal point; printed exactly as is SH#H.4H4 
E Alphanumeric data; preceded by apostro- ’E 


phe (’); permits overflow to be printed to 
the right; left justifies; pads with blanks 


L Alphanumeric data; preceded by apostro- ’*LLLLLL 
phe (’); used as a mask; left justifies; pads 
with blanks 


R Alphanumeric data; preceded by apostro- “RRRRRR 
phe (’); used as a mask; right justifies; 
pads with blanks 

C Alphanumeric data; preceded by apostro- ‘CCCCCCC 


phe (’); used as a mask; centers in the 
field; pads with blanks 


Format Control Characters for IBM and TRS-80 


Explanation 


Same as DECSYSTEM 20. 
Same as DECSYSTEM 20. 
Same as DECSYSTEM 20. 


Two dollar signs cause the dollar sign to be floating, meaning that it will be in the first position 
before the number. 


Vacant positions will be filled with asterisks, and the dollar sign will be in the first position to the left 
of the number. 


When a + sign is placed at the beginning or end of a number, it causes a + sign to be printed if 
the number is positive and a — sign to be printed if the number is negative. 


When a — sign is placed at the end of a number, negative numbers will have a negative sign, and 
for positive numbers it will appear as a space after the number. 


This causes the number to be printed in exponential format. 


AANA ttt or 
{tL 
%space% 


\spaces\ This specifies a string field to be two plus the number of spaces between the characters. 

This causes the computer to print only the first string character. 

This specifies a variable-length field. The string is output exactly as it is entered. 

Underscore causes the next character in the format string to be printed out. The character itself 
may be underscored by preceding it with two underscores (___). 

If the number to be printed is larger than the specified field, a percent sign will appear before the 
number. If rounding caused the number to exceed the field, the percent sign will be printed in front 
of the rounded number. 


74 Complete BASIC Programming 


Figure 4-6 PRINT USING STATEMENT ON DECSYSTEM 20 


00010 REM *** PRINT PROGRAM TO ILLUSTRATE PRINT USING *** 
00015 PRINT 
00020 PRINT 


00030 PRINT\PRINT 

00035 READ A$,X 

00040 IF A$ = "END" THEN GOTO 999 
00045 LET Y = X * .06 


00055 GOTO 35 

00060 DATA "TOASTER",27.5,"BLENDER",15.45 

00065 DATA "BLANKET",9.90,"KNIVES",34.99,"FAN",29,99 
00070 DATA “END",0.00 


00999 END 


ITEMS PURCHASED PRICE SALES TAX | 
| 


TOASTER $27.50 $1.65 
BLENDER $15.45 $0.93 | 
BLANKET 
KNIVES 


The program in Figure 4-6 illustrates some of these control characters on 
the DECSYSTEM 20. 

The IBM/Microsoft and TRS-80 PRINT USING statements are some- 
what different. The general format for both of these systems looks like 
this: 


line# PRINT USING ‘“‘format’’;expression-list 


For a list of the control characters for both IBM and TRS-80, see box. 
Figure 4-7 shows examples of the PRINT USING statement on the IBM 
Personal Computer. Differences for the TRS-80 also are given. 
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Figure 4-7. PRINT USING STATEMENT ON IBM PERSONAL COMPUTER AND TRS-80 


12.67 345.99 3.10 


65.24) 45.70 472515 


63.24- 5.74 38.22- 
##123.56 ***86.20 
$123.56 $86.20 
**$549.26 ***$44.20 
3,967.44 
2.68E+01 
666.4E+02 
$12.34 
%876.34 


GB 
GOODBYE 
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LEARNING CHECK 


. When printing more than one item on a line, a(n) _______ tells the computer to 
space over to the next print zone and print the value. 


. Aprint zone may be skipped by which of the following? 
a. Using two consecutive commas. 
b. Using two consecutive semicolons. 
c. Enclosing a space in quotation marks. 
d. Using a semicolon. 
. When a PRINT statement ends with a comma or semicolon, the next PRINT will 
Degini se 
a. on the next line 
b. on the next page 
c. on the same line 
. A semicolon between the items tells the computer to skip to the next 
to print the next item. 


a. line 
b. column 
ONISN INId “9 A Sa daha . . 
avl ‘S . The ________ function allows output to be printed in any column in an output 
qb line. 
: € . The _______ statement tells which statement in the program has the print 
pel eat a: id what val to be used in the print li ki: 
eULOD *) image and what values are to be used in the print line. 
siomsuy 


A Programming Problem 


Problem Definition 


Savings City has two stores—one in Dallas and the other in Houston. It 
needs a program to list its income, expenses, and profits for each store, as 
well as the totals for both stores. It should be formatted as follows: 


SAVINGS CITY 
DALLAS HOUSTON TOTAL 
INCOME 
EXPENSES 
PROF IT 


Solution Design 


To produce the desired output, we need to ask the user to enter the in- 
come and expenses for each store. To find the profits for each, all we need 


Input and Output 77 


Summary 
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to do is subtract expenses from income. To find the total income, ex- 
penses, and profit, just add the income, expenses, and profits from each 
store: 


Income 1 + Income 2 = Total income. 
Expenses 1 + Expenses 2 = Total expenses. 
Profits 1 + Profits 2 = Total profits. 


The Program 


The program in Figure 4-8 documents the major variables used in lines 
105 through 115. Lines 125 through 140 request the user to enter data. 
Lines 125 and 135 are prompts telling the user what values to enter. After 
the data have been entered, program execution continues. The headings 
are printed in lines 145 through 170. Notice how line 155 uses TAB to 
center the heading. Total income, I3, is figured in line 175; total expenses, 
E3, are computed in line 180, lines 185 and 190 figure the profits for each 
store, P1 for the Dallas’s store profit and P2 for the Houston store’s profit; 
and line 195 computes the total profit, P3. Lines 200 through 210 print the 
results in the desired format. 


= The INPUT statement is used to enter data into a program in a question- 
and-answer mode. 


ew Another way of entering data into a program is to use READ and DATA 
statements. The READ statement causes values contained in the DATA 
statements to be assigned to variables. 


m READ and INPUT statements are located where the logic of the program 
indicates. DATA statements are nonexecutable and may be located any- 
where in the program. 


ma When more than one item is to be printed on a line of output, the spac- 
ing can be indicated by the use of commas and semicolons. 


= Each line of output can be divided into a predetermined number of 
print zones. The comma is used to cause results to be printed in the 
print zones. 


mw Using a semicolon instead of comma to separate printed items causes 
output to be packed more closely on a line. 


m= Using the TAB function in a PRINT statement permits results to be 
printed anywhere on an output line. 


m The PRINT USING feature provides a flexible method of producing out- 
put. The format control characteristics in the image statement define 
how the output will look. 
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Figure 4-8 INCOME, EXPENSE, AND PROFIT REPORT AND FLOWCHART 


00100 REM *** FIGURE PROFITS *#* 

00105 REM *** 11,12,13 ARE THE INCOMES ®** 
00110 REM *** £€1,€2,£3 ARE THE EXPENSES *#* 
00115 REM *** P1,P2,P3 ARE THE PROFITS *#* 
00120 REM 


45 PRINT 
00150 PRINT 


00160 PRINT 


00170 PRINT 

00175 LET 13 "1 
00180 LET E3 E1 
00185 LET P1 1 
00190 LET P2 12 
00195 LET P3 PI 


(Figure continued next page) 
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Review Questions 


Figure 4-8 = (continued) 


NNH : 
NTER INCOME AND EXPENSES FOR SAVINGS CITY IN DALLA 


2367.45,1500.67 
NTER INCOME AND EXPENSES FOR SAVINGS CITY IN HOUSTON 
4589.53,3102.86 


SAVINGS CITY 
DALLAS HOUSTON TOTAL 
$ 2367.45 $ 4589.53 $ 6956.98 


$ 1500.67 $ 3102.86 $ 4603.53 
$ 866.78 $ 1486.67 $ 2353.45 


. When is a LET statement preferred for entering data? 
. What are the advantages of the INPUT statement? 
What is the purpose of a prompt? 


. Using the INPUT statement, how would you set up a program to ask 
a person his or her name, age, and date of birth and to print the 
results? 

5. Is the following a valid INPUT statement? 

10 INPUT “THE NAME OF YOUR DOG”;N 


PrP won 
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710. 
. What happens when a PRINT statement ends with a semicolon? 
. In which print zones would the following variables be printed? 


A3 


A4 


18, 


19. 


20. 


. When are READ/DATA statements best used? 
. Where should DATA statements be placed in a program? 
. Is the following a valid READ statement? 


20 READ N$ B6 A 


. After the following READ/DATA statements were executed, what 


would be the value of each variable? 


10 DATA 256,49 

20 DATA “TAMPA BAY” 
30 DATA “FLORIDA”’,40421 
40 READ A,B,C$ 

50 READ S$,X 


What happens when a PRINT statement ends with a comma? 


~ 300 PRINT C,X;“ ”,T 
_310 PRINT A,“ ”,D,F 


What would the output of this PRINT statement look like if A$ = 
DOG and B$ = HOUSE? 


400 PRINT A$;B$ 

In what print zone would you find each of the following variables? 
475 PRINT V,S,T,N,P,R,W 

How would you print KIM YOUNG starting in column 12? 


. Using the TAB function, what would the PRINT statement look like 


that prints out NAME starting in column 1, CITY in column 20, and 
STATE in column 35? 


. Is the following a valid PRINT USING statement? 


300 PRINT USING 20 Q,R,S,T 
Why is the following image statement invalid? 
250 ‘LLLLL $##.## ‘RRRRR 


What would the output from this PRINT statement look like if N$ = 
JOE and A = 1475.59? 


130 PRINT USING 140,N$,A 
140: ‘LLLLLLL bb, $4444.44 


Give the output from the PRINT USING statement in Question 19 
using the following image statement: 


140: ‘RRRRRRR BLP Sesestt tH 
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Debugging Exercises 


al 


. Debug this program: 


00010 DATA "MR. LEWIS",57,63,"MRS. WOODEND" 
00015 READ N1$,A1 

00020 READ N2$,A2 

00999 END 


How should these PRINT statements be corrected to match their 
output if X = 2, Y = 365, Z = 900, R = 52, A$ = YEARS, and B$ = 
WEEKS’? 


Output 

PS es ee 7 eee c 
TIM TUCKER 

2 365 900 52 

2 356 YEAR 


. 00060 PRINT "TIM"G"TUCKER" 
00090 PRINT XsY+ZgR 

. 00010 PRINT XsY 5 

00020 PRINT A$ 


are 978 


. Correct these instructions so they are in proper format: 


a. 00100 PRINT TAB(10);B$ 

b. 00110 PRINT TAB(47);Xs;TAB(55);Y 

c. 00120 PRINT TAB(75) ;A$;TAB(20) 3X 

d. 00130 PRINT TAB(10);T$;TAB(30) ; "HELLO" 


. Which of these READ statements are invalid? Correct them. 


00010 READ A$,B,2) 
00100 READ B2,C$,X 
00110 READ (7$,C 


. This program statement wants a person’s name and age. Correct it so 


that the user knows what to enter (prompt): 
00050 INPUT N$,A 
Correct the following statement: 


00010 INPUT "ENTER CITY,STATE,AND ZIP CODE";X,Y,Z$ 


. How would you change this so that the heading is centered on an 


eighty-character line? 


00100 PRINT "REPORT HEADING" 


. Correct this PRINT USING instruction: 


00010 PRINT USING NAME,2563 
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9. Correct this image statement: 
00100 ‘'LLLLL ## .## 
10. Correct this READ statement: 


00010 DATA 10,/ABC,20 
00020 READ X$,C,D 


Additional Programming Problems 


1. Write a program that asks for the name and weight of an object and 
computes the weight in kilograms (1 pound = 0.453592 kilograms). 
The program should print out the name of the object, weight in 
pounds, and weight in kilograms, each in three different zones. 


2. Write a program using the INPUT statement that asks for four numbers, 
computes their average, and then prints the numbers and their average. 


3. Mr. Leady wants to know how much it would cost him to replant the 
grass in his backyard, which measures 150 by 200 feet. Grass seed 
costs $0.93 per pound, and one pound covers 50 square feet. He also 
needs to know how much it would cost if he used Special Blend 
Grass Seed, which is $0.99 per pound, and one pound also covers 50 
square feet. The program should output the cost of using each and the 
cost difference between the two. 


4. Write a program using READ/DATA statements to read in prices of 
four items and compute the tax. (Tax is 6 percent on a dollar.) List 
the four items, the tax, and the total, making use of the PRINT 
USING statement. Label the tax and total. Use this data: 12.79, 9.99, 
4.57, 30.02. The output should look like this: 


12.79 
9.99 
4.57 
30.02 
Tax XX.XX 


Total $XX.XX 


5. Write a program to read in the following data and print it out with 
the headings NAME, AREA CODE, and TELEPHONE #, using the 
TAB function: 


BOB HOAX, 491, 535-0101, JANICE FREZE, 982, 453-0748 


6. Print out these holidays, with the date on the first line and the 
holiday on the next followed by two blank lines; then print the next 
date and holiday: 


December 25 Christmas 
January 1 New Year’s Day 
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Overview 


After reading this chapter, the student should be able to do the following: 
mw Understand and use the unconditional transfer statement GOTO. 


mw Understand and use the conditional transfer statements IF/THEN and 
IF/THEN/ELSE. 


w Be familiar with the logic of nested IF/THEN/ELSE statements. 


= Understand and use the conditional transfer statement ON/GOTO. 


m= Understand the purpose of a menu. 


mw Set up loops using trailer values and counters. 


The programs described to this point contained instructions that were 
always executed one right after the other—from the lowest line number 
to the highest. This chapter will discuss ways of transferring control to 
program statements out of sequence by using the GOTO, IF/THEN, and 
ON/GOTO statements. One of the most valuable programming 
techniques, looping, will also be discussed. 

In the previous chapters, we have been able to run only one set of 
data without having to repeat a program segment multiple times or rerun 
the program. For example, if we had a program that computed an 
individual’s bowling average for three games, chances are that we 
probably would want to calculate the average of more than just one 
person. Without the control statements discussed in this chapter, we 
would have to rerun the program for each set of data or rewrite the 
program segment that calculates the average as many times as we had 
bowlers. Using one of these control statements, however, allows us to 
process multiple sets of data more efficiently. We might want, for 
example, the output of the bowling average program to appear as 
follows: 


NAM 
AM E 


In this chapter we will see how these control statements allow us to 
obtain this output. 


The GOTO Statement: Unconditional Transfer 3 
All BASIC programs consist of a series of statements that normally are 
executed in sequential order. Sometimes, however, it is desirable to alter 
the flow of execution. This is called branching, and the programmer can 
use the GOTO statement to do it. The general format of the GOTO state- 
ment is as follows: 


line# GOTO transfer line# 


The programming command GOTO can be written as one word or as two 
words, GO TO. 

The GOTO statement is called an unconditional transfer statement, be- 
cause the flow of execution is altered to the transfer line number every 
time the statement is encountered. 

A typical GOTO statement follows: 


This statement tells the computer that the next statement to be executed 
is line 60. If line 60 is an executable statement, that statement and those 
following are executed. If it is a nonexecutable statement, execution pro- 
ceeds at the first executable statement encountered after line 60. 

Let us see how the GOTO statement might be used in an application by 
first looking at Figure 5-1, which calculates the bowling averages for three 
individuals and prints the results without using a GOTO statement. What 
we really have here is a single process (adding three numbers together and 
dividing by 3) repeated three times. The programmer typed in the follow- 
ing three lines as many times as was necessary: 


Although this is not a very difficult task with a small, uncomplicated prob- 
lem, imagine how time consuming and inefficient it would be to do it for a 
hundred sets of data! 

The same result can be achieved much more simply by using a GOTO 
statement. In Figure 5-2, the GOTO statement in line 30 directs the com- 
puter back to statement 15. A loop is formed. In this example, the error 
message “End of DATA found at line 00015 of MAIN PROGRAM” was 
printed because an attempt was made to read data after the data list had 
been exhausted. The execution of the program was terminated. 

Note how the loop is indicated in the flowchart. A flow line is drawn 
from the process step immediately preceding the GOTO statement to the 
process step indicated by the transfer line number. 
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Figure 5-1 BOWLING AVERAGE PROGRAM 
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Figure 5-2 BOWLING AVERAGE PROGRAM WITH GOTO STATEMENT 


00010 PRINT "NAME AVERAGE" 

00015 READ N$,S1,S2,S3 

00020 LET: Aj=.CSte 40S 2) seSSyrsS S 
PRINT N$,A 


Print 00035 DATA "F. FLINTSTONE", 168,157,164 

aa 00040 DATA "B. RUBBLE",152,161,164 
dings 00045 DATA "T. TIME",173,165,166 

00999 END 


RUNNH 


Calculate 
Average 


at line 00015 of MAIN PROGRAM | 


Print 
Name and 
Average 


The INPUT statement could have been used in Figures 5-1 and 5-2 
instead of the READ/DATA statements. Figure 5-3 shows the results of 
using an INPUT statement with the GOTO statement. Notice the computer 
response “,C at line 00010 of MAIN PROGRAM” at the end of the output. 
This appears because when we use the INPUT statement in conjunction 
with the GOTO statements, as we did in Figure 5-3, an infinite loop is 
formed. The program will keep asking us for input until we manually 
interrupt it. This can be done by pressing the control key (CTRL) and the C 
key simultaneously (CTRL and BREAK on some systems), which results in 
the message ‘‘,C at line 00010 of MAIN PROGRAM” (or something similar 
such as “Break in 10”) to be printed. 
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Figure 5-3 BOWLING AVERAGE PROGRAM USING INPUT AND GOTO STATEMENTS 


- BOWLERS NAME ? F. FLINTSTONE 
NTER SCORES FOR 3 GAMES ? 168,157,16 


NAME AVERAGE 
IF. FLINTSTONE 163 


FENTER BOWLERS NAME ? 8. RUBBLE 
FENTER SCORES FOR 3 GAMES ? 152,161,164) 


AVERAGE 
159 


PENTER BOWLERS NAME ? °C 
e | Tne 00010 of MAIN PROGRAM 
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Later, this chapter will show how to control the number of times a loop is 
repeated (eliminating any error messages and the need to manually inter- 
rupt the program). 


The IF/THEN Statement: Conditional Transfer 


The GOTO statement always transfers control. Often, however, it is neces- 
sary to transfer control only when a specified condition exists. The IF/ 
THEN statement is used to test for such a condition. If the condition does 
not exist, the next statement in the program is executed. The general for- 
mat of the IF/THEN statement is this: 


line# IF condition THEN line# 


A condition has the following general format: 


relational 
expression symbol expression 


For example, in the statement “110 IF X < Y + 1 THEN 230,” X < Y + 1 
is the condition. 

Conditions tested can involve either numeric or character string data. 
Relational symbols that can be used include the following: 


Symbol Meaning Examples 

<S Less than A<B 
<=ors Less than or equal to X<=Y 

> Greater than \Prseal 
>=or= Greater than orequalto A>=B 

= Equal to X=T 

N$ = “NONE” 

<>or>< Not equal to R<>Q 


“APPLE” <> R$ 


Some examples of valid IF/THEN statements follow: 


Statement Computer Execution 


If the value contained in X is greater 
than or equal to 6, the computer 
branches to line 30. If not, the 


computer executes the next sequential 
instruction, line 20. 
If K is not equal to N * 40, the 
computer transfers to statement 50. 
Otherwise, it executes the next 
statement, line 20. 

(Table continued next page) 
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Statement (continued) Computer Execution 

If the value contained in A$ is NO, 
control is passed to line 60. If A$ 
contains anything else, control goes to 
line 50. 


The program in Figure 5-4 uses both numeric and character string com- 
parisons to search voter registration records to find all registered Republi- 
cans in District 3 so they can be placed on a mailing list. The program 
reads the name, district in which registered, and party affiliation for each 
registered voter. A numeric comparison is made to determine if the voter 
resides in District 3: 


Figure 5-4 MAILING LIST PROGRAM 


00010 READ N$,D,P$ 
00015 REM REJECT IF VOTING DISTRICT <> 3 


00025 REM REJECT IF PARTY AFFILLIATION <> "REPUBLICAN" 


00035 PRINT "PLACE ";N$;" ON MAILING LIST" 
00040 GOTO 10 

00045 DATA “HEATHER THOMAS",3,"DEMOCRAT"™ 
00050 DATA “ALAN JEFFERIES",3,"REPUBLICAN" 
00055 DATA "TON! BLAIR",5,"REPUBLICAN” 
00060 DATA "DON MAYS",3,"REPUBLICAN" 

00999 END 
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The test is stated in such a way that only if the candidate resides in Dis- 
trict 3 will the program continue to evaluate his or her record. Otherwise, 
control is transferred to line 40. 

The other qualification for the mailing list is that the voter be a regis- 
tered Republican. A comparison of character strings is made to determine 
this requirement: 


If the person is not a Republican, control is transferred to line 40. 

Any person who satisfies both conditions is placed on the mailing list. 
The program output indicates that only two people, Alan Jefferies and Don 
Mays, should be placed on the mailing list. 

Note the diamond-shaped symbol in the flowchart in Figure 5-4. It is a 
decision block representing the IF/THEN test. The outcome of the test 
determines which flow line (path of program logic) will be followed. 


line# IF condition THEN statement 


The statement following THEN can be a BASIC statement or statements. 
Some examples follow: 


Figure 5-5 uses this form of the IF statement to indicate whether the result 
of an arithmetic operation is positive, negative, or 0. 


IF/THEN/ELSE Statements 


The general format of the IF/THEN/ELSE statement is this: 
line# IF condition THEN clause ELSE clause 


The clause can be a BASIC statement or statements or a line number to 
branch to. 

If the condition being tested is true, the clause following the THEN 
statement is executed. If the condition is false, the THEN clause is by- 
passed, and the clause following ELSE is executed. 

Some examples of valid IF/THEN/ELSE statements are given here: 


Tiida dhs na daa Ah ADR 
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Figure 5-5 SIGN OF NUMBER PROGRAM 


00010 INPUT "ENTER ANY TWO NUMBERS";A,B 
00015 LET X = A - B 


UNNH | 
Bhat | NTER ANY TWO NUMBERS ? 7, 
Mieaye ci S 
Pg 1S NEGATIV 
| positive” 


Figure 5-6 illustrates the use of an IF/THEN/ELSE statement. 


Nested IF/THEN/ELSE Statements 


Some systems allow IF/THEN/ELSE statements to be nested, for example, 
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Figure 5-6 IF /THEN/ELSE STATEMENT 


THIS PROGRAM CALCULATES THE 


AVERAGE OF TWO NUMBERS 


DO YOU WISH TO CONTINUE 


ENTER YES OR NO ? YES 


ENTER TWO NUMBERS 
2? 7,9 
THE AVERAGE OF 7 AND 9 IS 


THIS PROGRAM CALCULATES THE 
AVERAGE OF TWO NUMBERS 


DO YOU WISH TO CONTINUE 
ENTER YES OR NO ? N 


jor) 
[s 
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£ 
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2) 
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If a statement does not contain the same number of ELSE and THEN 
clauses, each ELSE is matched with the closest unmatched THEN. For 
example, 


will not print ‘“X <> Z” when X is not equal to Y. 
Figure 5-7 illustrates the use of nested IF/THEN/ELSE statements to 
calculate the price of soft drink ordered. 


LEARNING CHECK 


. Ina BASIC program, the term _______ refers to altering the flow of execution. 


. The GOTO statement is called a(n) _______ transfer statement, because the 
flow of execution is altered every time the statement is encountered. 


. The _______ statement a/ways transfers control. 


. The IF/THEN statement 
a. always transfers control 


b. transfers control only when a specific condition exists 
c. never transfers control 
d. none of the above 


. ls the following a valid nested IF/THEN/ELSE statement? 


SOA 
q 

OLOD 
Jeuolipucoun - 
Buiyouesq - 


rao 


IF X ¢ 100 THEN Y = 1 ELSE IF X ) 100 THEN Y = 2 ELSE Y = 0 


siomsuy 


The ON/GOTO Statement: Conditional Transfer 


The ON/GOTO, or computed GOTO, statement transfers control to other 
statements in the program based on the evaluation of a mathematical ex- 
pression. The computed GOTO often operates as would multiple IF/THEN 
statements; any one of several transfers can occur, depending on the result 
computed for the expression. Since transfers depend on the expression, 
the computed GOTO is another conditional transfer statement. Its general 
formal is this: 


line# ON expression GOTO line#1,line#2,line#3, . .. ,line#n 


The arithmetic expression always is evaluated to an integer, and the line 
numbers following GOTO must identify statements in the program. 
The general execution of the ON/GOTO statement proceeds as follows: 


1. If the value of the expression is 1, control is transferred to the first 
line number indicated. 
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2. If the value of the expression is 2, control is transferred to the second 
line number indicated. 


n. If the value of the expression is n, control is transferred to the nth 
line number indicated. 


Several examples are presented here to illustrate the operation of this 
statement: 


Statement Computer Execution 


IF X = 1, control goes to line 50. 

IF X = 2, control goes to line 80. 

IF X = 3, control goes to line 100. 

IF N/50 = 1, control goes to line 90. 
IF N/50 = 2, control goes to line 100. 


s For example, 


Statement Value of Variable Action 


N=7 7 + 3 = 2.33. The 
expression is evaluated 
as 2.33. The remainder 
is truncated, and the 
result becomes the 
integer 2. Control passes 
to statement 80. 


Statement Value of Variable Action 


X=4 The value of X 
exceeds the number 
of line numbers in 
the GOTO list. 
Control passes to 


statement 70. 


The box “ON/GOTO Errors” illustrates how various BASIC implementa- 
tions respond to these conditions. 
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ON/GOTO Errors 


Action If Number 

Evaluated Is Greater Action If Number Evaluated 
Than Number of Is Less Than 1 or Greater 
Line Numbers Than Maximum Allowed 


DECSYSTEM 20 Execution stops/Error “ON STMT OUT OF RANGE" error 
message displayed 
Apple ON/GOTO bypassed “ILLEGAL QUANTITY” error 
IBM/Microsoft ON/GOTO bypassed “ILLEGAL FUNCTION CALL" or ““OVERFLOW"' error 
TRS-80 ON/GOTO bypassed “?FC" error 
PET/Commodore 64 ON/GOTO bypassed “ILLEGAL QUANTITY” error 


Menus 


Looping Procedures 


A menu is a listing that displays the functions that can be performed by a 
program. The desired function is chosen by entering a code (typically a 
simple numeric or alphabetic character) from the terminal keyboard. A 
computer menu is like a menu in a restaurant. The user (diner) reads a 
group of possible selections on the screen (menu) and then enters a se- 
lection into the computer (describes the desired meal to the waiter or 
waitress). 

The calculator menu program (Figure 5-8) illustrates a common use of 
the ON/GOTO statement in making a menu selection. The user tells the 
computer whether to add, subtract, multiply, or divide two numbers by 
entering either 1, 2, 3, or 4. Line 170 transfers the program execution to the 
appropriate operation. 

In the example, after entering the values for A and B, the user indicates 
that division is the desired operation by typing in the number 4, which is 
assigned to the variable C. Line 170, an ON/GOTO statement, causes pro- 
gram execution to branch to the fourth line number, 205. The operation is 
then performed, and the result is printed. 


There are several things to consider in setting up a loop. The programmer 
must decide not only what instructions are to be repeated, but also how 
many times the loop is to be executed. There are three techniques for loop 
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control. This section covers trailer values and counters. Chapter 6 will 
discuss the other method, FOR and NEXT statements. 


Trailer Value 


A loop controlled by a trailer value contains an IF/THEN statement that 
checks for the end of the data. The last data item is a dummy value that is 
not part of the data to be processed. Either numeric or alphanumeric data 
can be used as a trailer value. However, the programmer must always 
select a trailer value that will not be confused with real data. For example, 
a customer account number is never 0, which implies that zero may be 
safely used as a dummy value. 

Here is how it works. An IF/THEN statement is placed within the set of 
instructions to be repeated, usually at the beginning of the loop. One of the 
variables to which data is entered is tested. If it contains the dummy val- 
ue, control is transferred out of the loop. If the variable contains valid data 
(does not equal the trailer value), looping continues. 

Figure 5-9 contains a loop pattern controlled by a trailer value. The 
program calculates the commission on sales made by several employees of 
the Rich Rugs Company. Statement 135 tests the value N$ for the dummy 
value: 


If the condition is true, the flow of processing drops out of the loop to line 
170. If the condition is false, processing continues to the next line in se- 
quence, line 140. Note that since we used the INPUT statement to enter 
the data, it is necessary to tell the user how to end the looping process. 
This is done in line 120. The user has to enter two dummy values, LAST 
and 0, because the INPUT statement expects two values to be entered. 


Counter 


A second method of controlling a loop requires the programmer to create a 
counter—a numeric variable that is incremented each time the loop is 
executed. Normally, the increment is 1. A counter is effective only if the 
programmer notifies the computer how many times a loop should be re- 
peated. The following steps are involved in setting up a counter for loop 
control: 


1. Initialize the counter to give it a beginning value. 
2. Increment the counter each time the loop is executed. 


3. Test the counter to determine if the loop has been executed the 
desired number of times. 
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Figure 5-9 SALES COMMISSION PROGRAM USING TRAILER VALUE 


REM *** RICH RUGS CO. *** 

LET R = .15 

REM *** BEGINNING OF LOOP *** 
PRINT "ENTER NAME, AMOUNT" 

PRINT "TYPE 'LAST,O" TO END" 
INPUT N$,S 

REM *** TEST FOR TRAILER VALUE *** 
TEINS = "CAST" THEN) 1:70 

LET e 

PRINT "NAME","SALES", "COMMISSION" 
PRINT N$,S,C 

PRINT 

GOTO 115 

REM *** END OF LOOP *** 

PRINT 

PRINT "FINISHED" 

END 


Print 
Finished 
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Figure 5-9 OUTPUT (continued) 


TYPE ‘'LAST,O' TO END 

? GROUCHO,5000 ; 
NAME SALES COMMISSION 
GROUCHO 5000 750 


ENTER NAME, AMOUNT 
TYPE. ‘LAST,O" TO END 
2 CHICO,3400 ein 
NAME SALES. COMMISSION 
CHICO 3400 510.0001 


ENTER NAME,AMOUNT 

TYPE 'LAST,O* TO END 

? HARPO,7300 

NAME SALES COMMISSION 
HARPO 7300 1095 


ENTER NAME, AMOUNT 
TYPE _'LAST,O* TO END 
AST»O hal 


The sales commission program used in Figure 5-9 can be modified to 
use a counter, as shown in Figure 5-10. Since there are three salespeople, 
the loop must be executed three times. The counter in this example is X. It 
is initialized to 0 in line 115. The IF/THEN statement in line 130 tests the 
number of times the loop has been executed, as represented by the 
counter X. Line 155 causes X to be incremented each time the loop is 
executed. The loop instructions will be executed until X equals 3. 


LEARNING CHECK 


1. The _______ statement transfers control to other statements in the program 
based on the evaluation of a mathematical expression. 

2. A(n) —_____ is a listing that displays the functions that a program can per- 
form. 


3. A loop that is controlled by a (n) ____ contains an IF/THEN statement that 
checks for the end of the data. 

4. Anumeric variable that is incremented each time the loop is executed is called 
a(n) 
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Figure 5-10 SALES COMMISSION PROGRAM WITH COUNTER 


00100 REM *** RICH RUGS CO, *** 
00105 LET R = .15 
00110 REM *** INITIALIZE COUNTER *** 


00120 PRINT "NAME","SALES", "COMMISSION" 
00125 REM *** TEST COUNTER VALUE *** 
(00130 IF X = 3 THEN 999, 


00135 READ N$,S 
00140 C= S$ * R 
00145 PRINT 

00150 PRINT N$,S,C 


00160 REM *** UNCONDITIONAL TRANSFER *** 

00165 GOTO 130 

00170 DATA "WILLIAMS",3200,"DAVIES",2587,"FALKNER",12000 
00999 END 


RUNNH 
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A Programming Problem 


Problem Definition 


Ed Hoge, an instructor for Art 101, needs a program that will assign letter 
grades to students based on their test scores. In addition, he wants to know 
how many students are in each grade category and how many took the 
test. 

The grading scale is as follows: 


Score Letter Grade 
90 or more A 
78 to 89 B 
66 to 77 G 
54 to 65 D 
Less than54 =F 


The students and their scores follow: 


Student Score 
Nan Barnett 96 
Bob Szymanski 93 
Jim Strong 89 
Bob Tynecki 78 
Lynn Probst 90 
Bill Brandon 51 
Denise Siviy 88 
Vic Flynn 66 
Karen McKee 98 
Anne Tate 77 
The Program 


The counter variables are initialized to 0 by the READ and DATA state- 
ments in lines 115 through 120 of Figure 5-11. The name and grade for 
each student are read in line 140. Line 155 tests for the trailer value XXX. 
As long as the student’s name does not equal XXX, the loop is reexecuted. 
The total number of students is accumulated in line 160. The first test to 
determine the grade is made in line 165. If the number grade is less than 
90, it is not an A. Control is transferred to line 185, where the number 
score is tested again to see if it is less than 78 (less than that required for a 
B grade). In this fashion, scores less than the lowest number required for a 
particular grade are passed down to the next lowest level until the correct 
one is found. Line 245 requires no test; any grade less than 54 is an F. 
When the trailer value, XXX, is detected, control drops down to line 275, 
where printing of the totals occurs. 
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Figure 5-11 


LETTER GRADES PROGRAM AND FLOWCHART 
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Figure 5-11 LETTER GRADES PROGRAM AND FLOWCHART (continued) 


(Continued next page) 
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Summary 


Figure 5-11 OUTPUT (continuea) 


me JIM STRONG 
| BOB TYNECK1 
"LYNN PROBST 
© | BILL BRANDON 
@| DENISE SIVIY 
| vic FLy 


@ bees 


The GOTO statement is an unconditional transfer of control that allows 
the computer to bypass or alter the sequence in which instructions are 
executed. 


m= The GOTO statement often is used to set up loops. 
= The IF/THEN statement permits control to be transferred only when a 


specified condition is met. If the condition following IF is true, the 
clause following the word THEN is given control; if it is false, control 
passes to the next line. 


The IF/THEN/ELSE statement is an extension of the IF/THEN state- 
ment. If the condition following IF is true, the clause following THEN is 
given control. If the condition is false, control is transferred to the 
clause following ELSE. IF/THEN/ELSE statements may be nested. 


The ON/GOTO statement instructs the computer to evaluate an expres- 
sion and, based on its value, to branch to one of several points in a 
program. 


A menu is a listing that displays the functions a program can perform. 
The user selects the desired function by entering a code from the key- 
board. 


The number of times a loop is executed can be controlled by the use of a 


trailer value or a counter. 
<= ——— 
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e The trailer value is a dummy value entered at the end of all the data. 


= A counter can be set up if the programmer knows ahead of time how 
many times a loop is to be executed. 


Review Questions 


1. Why is the GOTO statement an unconditional transfer? 
2. Rewrite the following program segment using a GOTO statement: 


10 READ N$,X,Y 
15 LEP2Z 2X +3 
20 PRINT N$,Z 

25 READ N$,X,Y 
SO LEI Ns © Xt Y 
35 PRINT N$,Z 

40 READ N$,X,Y 
45 LEE 2 8 Xo +. ¥ 
50 PRINT N$,Z 

55 DATA "LARRY",10,5,"MOE",25,7,"CURLY",17,41 
999 END 


. Why is the IF/THEN statement a conditional transfer? 


. Conditions tested in the IF/THEN statement may be either numeric 
or character string. TRUE FALSE (Circle the correct answer.) 


. If the condition after the IF in an IF/THEN statement is false,+ 
control is transferred to 
a. the end of the program 
b. the statement at the line number following the word THEN 
c. the next statement in the program 


symbols are used in the IF/THEN statement to compare 
numeric or string variables and constants. 


2. Which of these are valid IF/THEN statements? 
a. 10 IF X <> “NO” THEN 30 
b. 60 IF Y = 2 THEN 100 
c. 100 IF A$ = “APPLE” THEN 150 
d. 200 IF X$ = “YES” THEN 250 


. The statement after ELSE in an IF/THEN/ELSE statement is 
executed when the condition is ‘ 
a. true 
b. false 


9. What is printed when these statements are executed? 


he w 


yan 


co 


10 LET X = 4 


20 IF X = 1 THEN PRINT “ONE” ELSE IF X = 3 THEN PRINT 
“THREE” ELSE PRINT “TWO” 
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10. The arithmetic expression in an ON/GOTO statement is always 
evaluated to a(n) 


11. If the value of the arithmetic expression in an ON/GOTO statement 
is evaluated to 3, control is transferred to 
a. the first line number indicated 
b. the next statement in the program 
c. the second line number indicated 
d. the third line number indicated 


12. To what line number will control be transferred when this 
statement is encountered (N = 51)? 


100 ON N / 17 GOTO 150, 200, 275 
13. What is a menu? 
14. What is a dummy value? 


15. A loop controlled by a trailer value contains a(n) statement 


that checks for the end of the data. 


16. What is a counter? 


17. What are the three steps involved in setting up a loop control 
counter? 


18. Which of the following symbols represents the IF/THEN test? 


| i fe 
eo ; € 
: 


19. In an IF/THEN statement, the THEN clause may be 
a. a line number 
b. a single BASIC statement 
c. multiple BASIC statements 
d 
e 


. all of the above 
. aand b only 


20. Rewrite the program in Question 2 using the GOTO statement and a 
trailer value. 
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Debugging Exercises 


Identify the following programs or program segments that contain errors, 


and debug them. 


as 00100 READ X$,A 
00105 PRINT X$,A 
00110 GOTO 10 
00115 DATA "TAMMY",5,"STACY",3 
00999 END 


2. 00120 READ A,B 
00130 LET X =A +B 
00140 IF X THEN 120 
00150 PRINT X 


3. 00010 READ C$ 


00015 IF C = "B" THEN PRINT "BLACK" ELSE PRINT "WHITE" 


00020 GOTO 10 
00025 DATA "B","B", "Ww", "Br, mye, mye 
00999 END 


4. 00010 READ N$,S$ 

00020 IF S$ = "S" THEN PRINT N$;"SINGLE" 
ELSE PRINT W$;"MARRIED" 

00030 GOTO 10 

00040 DATA "CATHY SMITH","S","SONYA APPLE","M" 

00050 DATA "JUDY WATERS","S" 

00999 END 

RUNNH 

CATHY SMITH SINGLE 

SONYA APPLE MARRIED 

JUDY WATERS SINGLE 


5. 00010 INPUT "ENTER DRIVER'S NAME"; N$ 
00015 INPUT "ENTER TOTAL POINTS",T 
00020 PRINT “ENTER FINISHING POSITION IN RACE" 


00025 PRINT " 1 FOR FIRST PLACE" 
00030 PRINT " 2 FOR SECOND PLACE" 
00035 PRINT " 3 FOR OTHER" 


00040 INPUT P 

00045 ON P GOTO 50,65,80 
00050 LET T=T+9 
00055 PRINT N$,T 

00060 GOTO 45 

00065 LET T = T + 6 
00070 PRINT N$,T 

00075 GOTO 45 

00080 PRINT N$,T 

00085 GOTO 45 

00090 DATA "RICHARD PETTY",2,"BOBBY UNSER",1,"A, 
00999 END 
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J. FOYT",5 


6. 00010 READ X,Y 
00020 LET Z=X/Y 
00030 ON Z GOTO 40,60 
00040 PRINT "X = Y" 
00050 GOTO 10 
00060 PRINT "X <> Y" 
00070 GOTO 10 
00080 DATA 20,10,40,10 


00999 END 

RUNNH 

Keay Xu< iY 

RS X = Y or error message 


7. 00010 PRINT TAB(7);"LEADING MONEY WINNER" 
00020 PRINT 
00030 PRINT TAB(5);"NAME"; TAB( 26); "AMOUNT" 
00040 PRINT 
00050 READ N$,A 
00060 IF N$ = "LAST" THEN 999 
00070 PRINT TAB(5);N$;TAB(26);A 
00080 GOTO 50 
00090 DATA “JOHN MCENROE",700,640 
00100 DATA "JIMMY CONNER",698,100, 
00110 DATA "BJORN BORG",601,830,,"XXX",0 
00999 END 


8. 00010 REM *** FINDS THE SUM OF 10 NUMBERS *** 
00015 LET X = 1 
00020 IF X > 10 THEN 45 
00025 PRINT "ENTER NUMBER" 
00030 INPUT W 
00035 LET S=S + W 
00040 GOTO 20 
00045 PRINT "SUM = ";S 
00999 END 


9. 00010 REM *** CONVERTS MILITARY TIME TO *** 
00020 REM *** CIVILIAN TIME *** 
00030 INPUT "ENTER MILITARY TIME "3M 
00040 IF M >= 13 THENC =M-12_ , 
00050 IF M >= 13 THEN X$ = "PM" ELSE X$ = "AM" 
00060 PRINT "MILITARY TIME";"CIVILIAN TIME" 
00070 PRINT " Cae be 
00080 PRINT M,C;X$ 
00090 END 
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10. 00010 REM *** PRINT OUT NAME & COUNTY *** 
00015 PRINT 1 WOOD COUNTY CODE # 
00020 PRINT 2 LUCAS COUNTY CODE # 
00025 PRINT 3 HANCOCK COUNTY CODE # 
00030 PRINT 4 OUT OF STATE 
00035 INPUT "ENTER NAME AND COUNTY CODE #";N$,C 
00040 ON C GOTO 60,55,50,45 
00045 PRINT N$;"LIVES IN WOOD COUNTY" 50 GOTO 999 
00055 PRINT N$;"LIVES IN LUCAS COUNTY" 60 GOTO 999 
00065 PRINT N$;"LIVES IN HANCOCK COUNTY" 70 GOTO 999 
00075 PRINT N$;"LIVES OUT OF STATE" 
00999 END 


Additional Programming Problems 


1. Write a program that calculates the gross pay for three employees and 
outputs employee name and gross pay. Use the GOTO statement and 
the following data: 


Name Rate Hours 


J. Smith 5.25 40 
M. Jones 3.75 35 
S. Franks 10.66 40 


2. As part of a computer demonstration, you have been asked to write a 
program that will print out horoscopes. A menu should be used to 
display the choices. Use the ON/GOTO statement and the following 
data: 


Signs Horoscope 


Aries YOU WILL BE RICH AND FAMOUS 
Taurus YOU WILL RECEIVE A GREAT JOB OFFER 
Gemini THERE IS HAPPINESS IN YOUR FUTURE 


3. You are a graduate assistant for Math 131, and the professor has 
asked you to calculate the grades. You do not want to do it any more 
than the professor does, so you have decided to write a program. The 
program has to find the average of three test scores and assign a letter 
grade. Here is a list of the five people in the class and their test scores 
to use for data: 
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Les Southwick 88 90 84 
Sue Fortney 90 96 94 
Debbie Knoblock 71 63 _ 69 
Dennis Smayer 45 57 59 
Anthony Polletti 69 76 81 


Use GOTO and IF/THEN statements with a counter to set up the 
loop. The grading scale is set up like this: 


90 to 100 A 
80 to 89 B 
70 to 79 & 
60 to 69 D 
59andbelow F 


i 4. The employees of Hard Line, Inc., are given evaluation ratings by 

: three different individuals. These ratings are averaged; based on this 
average, a report is to be printed recommending the action to be 
taken by the supervisor. Each of the three evaluations have a 
maximum value of fifty points. Your job is to compute the average 
score for each employee and write a report giving the recommended 
action to be taken for each. The report also should list the total 
number of employees being evaluated and the total number of 
employees in each category. The data is as follows: 


Score 
Employee Name Evaluation 1 Evaluation 2 Evaluation 3 
Karen McKee 49 50 48 
Bob Szymanski 50 49 50 
Ed Pfister 36 21 42 
Lisa Lape 15 13 22 


Recommended Action 


If average score > = 40, recommended for promotion and/or 
pay raise. 

If 40 > average score > = 30, take no action. 

If average score < 30, reprimand. : 


5. B. G. Motors would like a program to quickly calculate the customer 
costs for a new car. The costs include list price, trade-in 
consideration, options, tax, and dealer preparation charges. The tax is 
figured as a percentage of the list price plus the options plus the 
dealer prep minus the trade-in. Use INPUT statements to enter the 
values. Design the program to accept any number of option choices. 
The program is to generate an itemized bill. 
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6. The bursar’s office has requested a program that will calculate and 
display the general and instructional fees for each student enrolled 
for the fall term. In addition, a report should be printed out at the end 
showing total residents and nonresidents, as well as total fees. Use 
the following data: 


Social Security | Hours Residency 
Name Number Enrolled Status 
Debarr, Mark M. 265-83-3454 16 Resident 
Lindburg, Sally 342-87-8457 17 Nonresident 
Schuler, Melissa R.  435-83-8234 15 Resident 


General Fees 


Resident: $200 
Nonresident: $500 


Instructional Fee 


$35 per credit hour 
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The FOR and NEXT Statements 


The FOR and NEXT statements allow concise loop definition. The general 
format of the FOR and NEXT loop is as follows: 


line # FOR loop variable = initial expression TO terminal expres- 
sion STEP step value 


line# NEXT loop variable 


The FOR statement tells the computer how many times to execute the 
loop. The loop variable (also called the index) is set to an initial value. This 
value is tested against the terminal value to determine whether or not the 
loop should be executed. The initial and terminal values may be constants, 
variables, expressions, or decimals, all of which must be numeric. 

To set the initial value and test the counter took two lines (lines 10 and 
15) in Figure 6-1. The FOR statement combines these two steps into one 


statement: 


Loop Initial Terminal Step 
Variable Value Value Value 


Lines 25 and 30 in Figure 6-1 increment the loop variable (the counter) 
and send control back to line 15. The functions of these two statements are 
combined in the NEXT statement. In Figure 6-1, after control is trans- 
ferred back to line 15, the value of the loop variable is again tested against 
the terminal value. Once the value is exceeded, control passes to line 999. 
When FOR and NEXT are used, control goes to the statement immediately 
following the NEXT statement. 

Thus, the loop used in Figure 6-1 can be set up to use FOR and NEXT 
statements, as shown in Figure 6-2. The FOR statement in line 10 tells the 
computer to initialize the loop variable, N, to one. Between the FOR and 
NEXT statements is line 15, the instruction that is to be repeated; it prints 
out N and the result of N * 5 + 2. Line 20, the NEXT statement, incre- 
ments the loop variable by the step indicated in the FOR statement. The 
step value may be a constant, real number, variable, or expression, and it 
must have a numeric value. 
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Figure 6-1 LOOPING WITH A COUNTER 


PRINT NiN * 5 + 2 


00030 GOTO 15 


00999 END 
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Figure 6-2. FOR/NEXT LOOP 


00015 PRINT NoN * 5 + 2 


00999 END 


Flowcharting FOR and NEXT Loops 


Figure 6-3a illustrates the standard method of flowcharting the FOR 
NEXT loop. 


Processing Steps of FOR and NEXT Loops 


Let us review the steps followed by the computer when it encounters a 
FOR statement: 


It sets the loop variable to the initial value indicated. 
It tests to see if the value of the loop variable exceeds the indicated 
terminal value (this may occur the first time the FOR statement is 
executed). 

3. If the value of the loop variable does not exceed the terminal value, 
the statements in the loop are executed. 
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Figure 6-3 = FLOWCHARTING FOR/NEXT LOOPS 


Control Is Transferred to 


Statement Immediately Following NEXT 


Control Is Transferred to 
Statement Immediately Following NEXT 


4. If the value of the loop variable exceeds the terminal value, control 
is transferred to the statement following the NEXT statement. 


When the NEXT statement at the end of a loop is encountered, the 
computer does the following: 


1. It adds the step value (given in the FOR statement) to the value of 
the loop variable. If no step value is indicated in the FOR state- 
ment, the value is assumed to be +1. Thus, the following two 
statements are equivalent: 

00010 FOR N = 1 TO 5 STEP 1 
or 
00010 FOR N = 1705 

2. A check is performed to determine if the value of the loop variable 

exceeds the terminal value. 


3. If the loop variable does not exceed the terminal value, control is 
transferred back to the statement after the FOR statement and the 
loop is repeated. Otherwise, execution continues with the statement 
following the NEXT statement. 
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Rules for Using FOR and NEXT Statements 


Some rules to be aware of when you use FOR and NEXT statements fol- 
low: 


1. The initial value must be less than or equal to the terminal value 
when using a positive step. Otherwise, the loop will never be 
executed; for example, 


Valid: FOR X = 1 TO 10 STEP 2 
Invalid: FOR X = 100 TO 50 STEP 5 


2. There are times when it is desirable to use a negative step value, for 
example, to count backward from 10 by 2s (see Figure 6-4). The loop 
is terminated when the value of the loop variable, I, ‘‘exceeds” the 
specified terminal value, 2. In this case, though, the value of I 
“exceeds” in a downward sense—the loop is terminated when I is 
smaller than the terminal value. The initial value of the loop variable 
should be greater than the terminal value when using a negative step; 
for example, 


Valid: FOR J = 10 TO 1 STEP -2 


Invalid: FOR K = 1 TO 10 STEP 2 


3. The step size in a FOR statement should never be 0. This value 
would cause the computer to loop endlessly. Such an error condition 
is known as an infinite loop: 


4. Transfer can be made from one statement to another within a loop. 
For example, the program in Figure 6-5 reads in four names and the 
number of hours they worked. It will print out only those people who 
worked more than 40 hours. Note, however, that a transfer from a 
statement within the loop to the FOR statement of the loop is illegal. 
Such a transfer would cause the loop variable to be reset (rather than 
simply continuing the loop process): 


x 


Invalid Transfer 


If you want to continue the looping process but want to bypass some 
inner instruction, branch (transfer control) to the next statement, as 
was done in Figure 6-5 (line 20). 
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Figure 6-4 USING A NEGATIVE STEP VALUE 


5. The value of the loop variable should not be modified by program 
statements within the loop. For example, line 30 here is invalid: 


00010 FOR J = 1 TO 20 
. 90670 LETS = 5 4:5 
“90030 «LET J = 5S 

00040 NEXT J 
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Figure 6-5 TRANSFERRING CONTROL WITHIN A FOR/NEXT LOOP 


00010 FOR | = 1 TO 4 
00015 READ N$,H 


00025 PRINT N 

00030 NEXT | 

00035 DATA "SHELLI BECHSTEIN",42,"TONYA KNAUSS", 43 
00040 DATA "CHARLIE KOLDING",32, "FRANK FURTER",45 
00999 END 


}. The initial, terminal, and step expressions can be composed of any 
valid numeric variable, constant, or mathematical formula. The 
following examples are valid where X = 2, Y = 10, and Z = —2: 


x 
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7. Each FOR statement must be accompanied by an associated NEXT 
statement. In addition, the loop variable in the FOR statement must 
be specified in the NEXT statement. 


_There are some exceptions to Rule 7. 


In this case, I is the inner loop variable, and J is the outer loop variable and 
is equivalent to 


This would be a valid NEXT statement: 


When a NEXT statement without a loop variable is used, it returns control 


to the closest FOR statement (previous to the NEXT statement) that has 
not already been paired with a NEXT. The following is an example: 


When the computer comes to the NEXT statement on line 50, it pairs it 
with line 10, FOR I = 1 TO 10, because it is the closest FOR statement 
without a NEXT statement. Line 20, FOR J = 1 TO 5, has already been 
paired with the first NEXT statement on line 40. 

Figure 6-6 demonstrates the application of a FOR/NEXT loop. The pur- 
pose of this program is to find the total number of passengers who ride a 
roller coaster in a half-hour. There are eight runs each half-hour. The 
FOR/NEXT loop is set to be executed eight times—once for each run of 
the roller coaster. Each time through the loop, the user enters the number 
of passengers on the roller coaster, N, and the computer adds that number 
to the total, T. 


Entry and Exit Points 


It is good program design to have only one entry point into a loop and one 
exit point out of a loop. The entry point should be the first statement of the 
loop. When using the FOR/NEXT loop, the FOR statement is the entry 
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Figure 6-6 FOR/NEXT LOOP 


00100 REM *** TOTAL NUMBER OF PASSENGERS *** 
00105 REM *** ON ROLLER COASTER *** 
00110 REM *** N NUMBER OF PASSENGERS ON 1 RUN *** 


00115 REM *** T = TOTAL NUMBER OF PASSENGERS *** 4 


00125 PRINT “ENTER NUMBER OF PASSENGERS ON RUN #";1 
00130 INPUT N 
00135 LETS Sc TeoReN 


Enter 
Number of 00145 PRINT "TOTAL NUMBER OF PASSENGERS =";T 
Passengers 00999 END 


NUMBER PASSENGERS 
Print 
Number of 


Passengers ' ENTER NUMBER PASSENGERS 


NUMBER PASSENGERS 


NUMBER PASSENGERS 
NUMBER PASSENGERS 
NUMBER PASSENGERS 


NUMBER PASSENGERS 


NUMBER PASSENGERS 


NUMBER OF PASSENGERS 
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Figure 6-7 MULTIPLE ENTRY POINTS 


Figure 6-8 MULTIPLE EXIT POINTS 


Invalid Exit 
Point 


00010 FOR | = 1 TO 20 


(00015 IF | > 10 THEN 999. 
00020 PRINT | 
00025 NEXT | 
00999 END 


128 Complete BASIC Programming 


point, and the NEXT statement is the exit point. Figure 6-7 shows an 
example of poor program design with multiple entry points. 

This is invalid according to the single entry point rule, because line 10 
sends control to line 25 if X is greater than 1, and line 25 is inside a loop. 
When this happens, I may not contain a valid value. Also, on some sys- 
tems, when the computer gets to the NEXT statement it may give you an 
error, because it has found no corresponding FOR statement. 

The exit point should be the last statement of the loop. Figure 6-8 illus- 
trates poor program design using multiple exit points. The program in 
Figure 6-8 has poor structure because the loop is exited in line 15 if I is 
greater than 10. The loop will never execute until I equals 20. 


LEARNING CHECK 


statement tells the computer how many 


1. In a FOR/NEXT loop, the ___--__ 
times to execute the loop. 
2. When the terminal value is exceeded in a FOR/NEXT loop, control is transferred 
to the ‘ 
a. END statement 
b. statement immediately following the NEXT statement 
c. statement preceding the FOR statement 
d. next FOR statement 
3. In a FOR statement, if no step value is indicated, the value is assumed to be 


4. \dentify the valid FOR/NEXT statements: 
a. FOR X = 8 TO 2 STEP 2 


NEXT X 
b. FOR | = 1 TO 10 


NEXT | 
6. FOR J= 10° TO 1 STEP =1 


NEXT |} 
d. FOR M = 1 TO 20 STEP 2 


NEXT M 

5. The step size in a FOR statement may be 0 under certain circumstances. TRUE 
FALSE (Circle the correct answer.) 

6. Transfer can be made from a statement within the loop to the FOR statement of 

the loop. TRUE FALSE (Circle the correct answer.) 
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Nested FOR and NEXT Statements 


Loops can be nested; that is, all of one loop can be inside another loop or 
many other loops. An example of a nested loop follows: 


FOR | = 1 TO 10 
FOR J = 1 TO 10 


. Valid 
NEXT J 
NEXT | 
The inner loop often is indented to improve readability. In this case, 
each time the outer loop (I loop) is executed once, the inner loop (J loop) is 
executed ten times. When the J loop is terminated, control passes to the 
statement immediately below it, NEXT I. When control is transferred to 
FOR I (and the value of I does not exceed the terminal value, 10), the FOR 
J statement is soon encountered again. J is reinitialized, and the J loop is 
again repeated ten times. 
In nested FOR and NEXT statements, be careful not to mix the FOR 
from one loop with the NEXT from another. In other words, be sure one 
loop is completely inside another. The following example will not execute: 


FOR | = 1 TO 10 
FOR J = | TO 10 


. Invalid 
NEXT | 
NEXT J 
You must also be careful not to give nested loops the same index vari- 
able: 


FOR | = 1 TO 10 
FOR | = 1 T0 5 


Invalid 


NEXT | 
NEXT | 
If you do this, each time the inner loop is executed, it changes the value of 
the outer loop variable. This violates Rule 5. 

The following segment illustrates the mechanics of the nested loop. The 
outer loop will be executed three times, since I varies from 1 to 3. The 
inner loop will be executed two times each time the outer loop is executed 
once, so the inner loop will be executed a total of six times (2 X 3): 


FOR | = 1 TO 3 
FOR J = 1 T0 2 
Outer Loop PRINT I,J Inner Loop 
NEXT J 
NEXT | 
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a. First time through 1 1. First time through inner loop; J = 1 
outer loop; I = 1 1 2 Second time through inner loop; J = 2 
b. Second time through 2 1 Inner loopJ = 1 
outer loop; I = 2 2 2 Inner loop; J = 2 
c. Third time through 3 1 Inner loop;J =1 
outer loop; I = 3 3 2 Inner loop; J = 2 


As many loops may be nested within one another as desired, but use 
caution so that you do not mix the NEXT of one loop with the FOR of 
another. The brackets must never cross as they do in the invalid example 
of nested loops. Here is an example of multiple nested loops: 


FOR | = 1 TO 2 


PRINT | 
FOR J = 1 TO 3 
PRINT J; 
Loop Loop Loop FOR K = 1 T0 3 
1 2 3 PRINT K 

NEXT K 

NEXT J 

NEXT | 


In this example, each nested loop is completely within its outer loop (the 
brackets never cross each other). Loop 1 is executed two times. Loop 2 is 
executed six times (2 X 3). Loop 3 is executed eighteen times (2 X 3 X 3). 

Figure 6-9 is an application of nested loops that generates three multi- 
plication tables. The inner loop controls the printing of the columns in 
each row, and the outer loop controls how many rows will be printed. 

First, A is initialized to 1. Then execution of the inner loop begins. Line 
20 tells the computer (when B = 1) to print “1 X 1 = 1.” The comma at the 
end of that line tells the computer not to start the output of the next 
PRINT statement on a new line, but rather to continue in the next print 
zone. Line 25 increments B to 2 and sends control back to line 15. The 
variable A has not changed. The terminal value of B is not exceeded, so 
“2 X 1 = 2” is printed in the second print zone. The inner loop executes 
one more time and prints out “3 X 1 = 3.” After the inner loop has exe- 
cuted the third time, one complete row has been printed: 


xia 2X1=2 3X1 = 3 


To have printing start on the next line instead of in the next print zone, 
it is necessary to have the rest of the line printed with blanks. That is 
accomplished by line 30. Finally, A is incremented when line 35 is en- 
countered. The whole process continues until A exceeds the terminal 
value, 10. 
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Figure 6-9 NESTED LOOPS 


0002 . ape: NT By "X"5A;"="5B * A, 
00030 PRINT 
(00035 NEXT AL 


00999 END 
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WHILE/NEXT and UNTIL/NEXT Loops 


Pc aepetnice Here is the general format for each of these 


WHILE/WEND LOOPS 


loops. 
WHILE/NEXT Loop: 


line# WHILE expression 


line# NEXT 
UNTIL/NEXT Loop: 


line# UNTIL expression 


line# NEXT 


Notice that the NEXT statement in each of these loops is not followed 
by a variable. Any statements between the WHILE and NEXT or the UN- 
TIL and NEXT statements will be executed each time the loop is repeated. 
The WHILE loop will be executed as long as the expression in the WHILE 
statement is true. When the expression is no longer true, control is trans- 
ferred to the first instruction after the NEXT statement. The UNTIL loop 
works in just the opposite way. UNTIL loops are executed as long as the 
expression is false. When the expression in the UNTIL statement is true, 
control is transferred to the statement immediately after the NEXT state- 
ment. The WHILE/NEXT and UNTIL/NEXT loops do not do any counting 
or incrementing. There must be an instruction within the loop that will 
alter the WHILE or UNTIL expression so the loop will eventually quit. If 
there is no instruction within the loop to change the expression’s value, 
the loop will not quit executing and will create an infinite loop. Figure 
6-10 illustrates a valid WHILE/NEXT loop. 

It is possible to do the same thing as Figure 6-10 does with an UNTIL 
loop. Figure 6-11 illustrates this. 

The following example is invalid. J is never changed, so it never will be 
greater than 100. The loop will be executed an infinite number of times: 


The BASIC implementation on some microcomputers (for instance, IBM/ 
Microsoft) implements the WHILE loop structure in the following manner. 
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Figure 6-10 WHILE/NEXT LOOP 
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Figure 6-11. UNTIL/NEXT LOOP 


00010 LET | = 


00020 PRINT | 
4 ied Hedin ote ee 


00999 END 


The WHILE statement starts and tests the loop, and the WEND statement 
at the end of the loop sends control back to the WHILE. Here is the general 
format of the WHILE/WEND loop: 


line# WHILE expression 
line# WEND 
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Figure 6-12 illustrates examples of valid WHILE/WEND statements run 
on the IBM Personal Computer with Microsoft BASIC. 


Figure 6-12 WHILE/WEND STATEMENT 
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LEARNING CHECK 


1. When one FOR/NEXT loop is completely inside another FOR/NEXT loop, we 
have what is referred to as loops. 
2. Which of the following are valid nested FOR/NEXT loops? 


a, FOR. = 1. Toto 
FOR J = 2 TO 6 


NEXT | 
NEXT J 
b. FOR | = 10 TO 1 STEP -1 
FOR K = 3 TO 9 STEP 3 


NEXT K 
NEXT | 
c. FOR T = 1 TO 5 STEP 1 
FOR S = 1 TO 3 
FOR R = 1 TO 10 


NEXT R 
NEXT S 
NEXT T 
d. FOR V = 10 TO 1 STEP -2 
FOR X = 1 TO 5 


‘NEXT V 
3. How many times will loop B be executed? 


FOR | = 1 TO 5 
FOR J = 2 T0 6 
Loop A Loop B PRINT J 
NEXT J 
NEXT | 


4. The following is a valid WHILE loop. TRUE FALSE (Circle the correct answer.) 


00010 WHILE X < 10 
00020 PRINT X 
00030 NEXT 


asje4 5. An UNTIL loop is executed as long as the expression in the UNTIL statement is 


asje4 

SOWI} BAY-AJUBM * 
2 pue q 

pe}sou 


rans 


siamsuy 
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A Programming Problem 


Problem Definition 


The computer science department needs a program to display a bar graph 
that shows the number of students enrolled in each of the computer sci- 
ence classes, sections 100 through 109: 


100 37 
101 28 
102 31 
103 34 
104 26 
105 22 
106 30 
107 21 
108 10 
109 18 


The output should have appropriate headings, and the horizontal bar 
should be marked off by 10s. 


Solution Design 


Two loops will be needed—one to give the section number and another to 
print out an asterisk for each student in that section. 


The Program 


Figure 6-13 is a good illustration of nested FOR/NEXT loops. Line 125 
contains the data—the number of students in sections 100 through 109, 
respectively. Statements 130 through 160 print out the headings with ap- 
propriate spacing. The outer loop (lines 165 through 200) is set to run from 
100 to 109, so the variable I represents the section number. Line 170 reads 
in the number of students; then the inner loop (lines 180 through 190) is 
set to repeat the PRINT statement (line 185) as many times as there are 
students. Line 175 printed the section number and tabbed the printer to 
column 9. Because lines 175 and 185 end with a semicolon, the printer will 
print the section number and all of the asterisks on one line. After the 
asterisks have been printed and the inner loop is finished, the printer must 
be advanced to the next line. This is done in line 195 which prints blanks 
in the remainder of the line. Because line 195 does not end with a comma 
or semicolon, the printer moves to the next line. 
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Many variations can be made to this bar graph display. The asterisk can 
be replaced by any other character. Also, the limitations placed by the 
width of the terminal can be overcome by using appropriate scales. For 
example, each asterisk could represent two students. 


Figure 6-13 ENROLLMENT PROGRAM AND FLOWCHART 


(Figure continued next page) 
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Figure 6-13 = (continued) 


00100 REM *** BAR GRAPH *** 

00105 REM *** SHOWS NUMBER OF STUDENTS ENROLLED *** 
00110 REM *** IN EACH COMPUTER SCIENCE SECTION *** 
00115 REM *** N = NUMBER OF STUDENTS *** 

00120 REM 

00125 DATA 37,28,31,34,26,22,30,21,10+18 

00130 PRINT 

00135 PRINT 

00140 PRINT TAB(16);"CLASS ENROLLMENT" 

00145 PRINT 

00150 PRINT "SEC. #";TAB(16); "STUDENTS" 

00155 Hadi TAB(8)31;TAB(17) 310; TAB(27) 520; TAB(37);30 


00170 READ N : 
00175 PRINT I;TAB(9) 


0018 PRINT Oey 
PRINT 
00999 END 


RUNNH 


CLASS ENROLLMENT | 


|@ 
STUDENTS 


HH KE HEH HE HE HEE HE HE HEE HEHE HE EE EX 
rEeTECELCECECECOCESTCTOOCE LES Y 
HHH HHH HHH HE HEHE EK 
HHH HHH HH HH HH HHH HR HHH HHH HHH HHH 
HHH HH HE HEHE HEHEHE HE HEHE HE EH HE HH 
EHRNRMERENENHRREHEREENE 
HHH HHH HK EK RRR H KHER 
HRHHKKKRKHKKHKKRHKHKKRHHHE 
HH HHH HHH HH 
HRN HMRE HRN ENRERERE 
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Summary 


m BASIC provides for concise loop definition with the FOR and NEXT 
statements. The FOR statement sets the initial, terminal, and step 
values and tests to see whether the initial value exceeds the terminal 
value. The NEXT statement increments the loop variable and sends 
control back to either the statement following the FOR statement or 
the statement following the NEXT statement. 


m= Some rules to remember when using FOR and NEXT loops follow: 

1. The initial value must be less than or equal to the terminal value 
when using a positive step value. 

2. The step value can be negative. If it is, the initial value must be 
greater than or equal to the terminal value. 

3. The step value should never be 0, this would cause the computer to 
loop endlessly. 

4. Transfer can be made from one statement to another within a loop. 
However, transfer from a statement within a loop to the FOR state- 
ment is illegal. 

5. The value of the loop variable should not be modified by program 
statements within the loop. 

6. The initial, terminal, and step expressions can be composed of any 
valid numeric variable, constant, or mathematical formula. 

7. Each FOR statement must be accompanied by an associated NEXT 
statement. 

8. FOR and NEXT loops can be nested. 

9. The NEXT statement of the inner loop must come before the NEXT 
statement of the outer loop. 


m The WHILE statement begins execution of a series of statements in a 
loop as long as the given condition in the WHILE statement is true. 


w The UNTIL statement begins execution of a series of statements in a 
loop as long as the given condition in the UNTIL statement is false. 


Review Questions 
1. Is this a valid FOR statement? 
20 FOR C$ = 1 TO 10 STEP 2 
2. Is this a valid FOR statement? 
100 FOR N = 100 TO 1 STEP 25 
3. What is the output from the following program? 


30 LET L = 10 

40 FORL = 1 TO6 
50 PRINT L 

60 NEXT L 
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4. If the initial value is greater than the terminal value, should the step 
value be positive or negative? 


5. If the step value is negative, will the loop be terminated when the 
initial value is less than or greater than the terminal value? 


6. Is this a valid FOR/NEXT loop? 


150 FOR J = 5 TO1 STEP —1 
160 PRINT 10/ J 
170 NEXT J 


7. Is this a valid FOR/NEXT loop? 


200 FOR K = 1 TO 10 STEP 2 
210 PRINT K 
220 NEXT I 


8. Can the step value be alphabetic? 
9. What is the step value assumed to be if it is not given? 
10. Can arithmetic expressions be used as initial and terminal values? 


11. What three things does the NEXT statement do? 
12. A good program design should have 
a. multiple entry and exit points 
b. single entry and exit points 
c. multiple entry and single exit points 
d. single entry and multiple exit points 


13. Is this a valid nested loop? 


FOR I = 1 TO (X + Y) 
FORJ =1TO5 
PRINT LJ 
NEXT I 
NEXT J 


14. Is this a valid nested loop? 


FOR I = 10 TO1 STEP —1 
PRINT I 
FOR J = 2 TO 6 STEP 2 
LETS =I+]J 
FOR K = 1T0O3 
LETS =S+K 
PRINT S 
NEXT J 
PRINT J 
NEXT J 
NEXT I 


15. How many times is the following inner loop executed? How many 
times is the outer loop executed? 
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FOR I = 1 TO (3 * 4) STEP 2 
FOR J = 1 TO 2 STEP .5 
PRINT I,J 
NEXT J 
NEXT I 


16. How many times is each of the following loops executed? 


FOR I = 100 TO 10 STEP —10 
FOR J =1TO5 
FOR K = 3 TO 1 STEP —1 
Loop 1 Loop 2 Loop 3 PRINT I,J,K 
NEXT K 
NEXT J 


NEXT I 


17. Can control be transferred from one statement to another within a 
loop? From a statement within a loop to the FOR statement? 


18. Is this a valid FOR/NEXT loop? 


10 FOR I = 1 TO 10 

20 READ X 

30 IF X > 20 THEN 50 
40 LETS=S+W 

50 NEXT I 


19. Which of the following is a valid WHILE loop? 


a. WHILE X < 10 
PRINT X 
LETX =X +1 

NEXT 

b. WHILEQ+6<R 
LETS = 8 #1 
PRINT S 

NEXT 


20. Explain the differences in constructing an UNTIL/NEXT loop and a 
WHILE/NEXT loop. 


Debugging Exercises 


Identify the following programs or program segments that contain errors, 
and debug them. 


1. 00010 FOR | = 1 TO 10 
00020 READ C 
00030 IF C = 1 THEN 1050 
00040 READ N 
00050 NEXT | 
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2. 00010 FOR J = 1 TO 20 
00020 LET v= J +1 
00030 NEXT J 


3. 00010 FOR J$ = 1,TO (5 * X) STEP 3 
00015 PRINT J 
00020 NEXT J$ 


4. 00010 FOR X = Y TO Z STEP V 
00020 FOR 1 := 3 TO 12 STEP #2 
00030 PRINT 1,X 
00040 NEXT X/ 

00050 NEXT + 


5. 00020 FOR | = 1 TO 5 
00030 FOR J = 1 TO 3 


00040 READ X 

00050 IF X <> 0 THEN 20 xo 
00060 READ H$ 

00070 PRINT H$ 

00080 NEXT J 

00090 NEXT | 


6. 00010 FOR K = 1 TO 5 
00015 FOR J = (3 + X) TO Z 


00020 FOR | = 1 TO 2 
00025 PRINT Kod, 
00030 NEXT K 7 


00035 NEXT J 
00040 NEXT 4k 


7. 00010 FOR X = TS TO 5 
00020 PRINT xX 
00030 NEXT X 


8. 00100 UNTIL W 
00105 PRINT 
00110 NEXT 


9. 00200 FOR K = 1 
00210 PRINT K 


20 


= 


TO: 100 STEP_10 


00220 FOR J Pro. 5 
00230 READ X 
00240 IF X < 10 THEN 250 
00250 NEXT J 
00260 NEXT K 

10. 00300 FOR P = 10 TO 1 STEP O 
00310 LETS Pea 


00320 NEXT P 


Additional Programming Problems 


1. The ACME MOVING COMPANY has asked you to write a payroll 
program that will calculate the weekly net pay for each of its hourly 


a 3 
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employees. The employees have the option of participating in a 
medical insurance plan that deducts $10 per week. The income tax 
rate is 40 percent. Use a FOR/NEXT loop in your program. 

The following is a list of hours worked during the last week, in 
addition to other data relating to each employee: 


Name Medical Plan Hours Wage Rate 
Justin Thyme Yes 40 $ 7.35 
Jerry Atrik No 38 6.25 
Kevin Cochran Yes 40 5.00 
Tina Hann Yes 40 10.25 
Scott Main No 30 4.15 
Shelly Vail Yes 35 3.25 


The output should appear as follows: 


Name Net Pay 
XXXXXXXXXX $XXX.XX 


2. Write a program to find X‘. The program should calculate X‘ by 
multiplying X times itself N number of times (for example, X? = X * 
X * X). The first number of the DATA statement is X, and the second 
number is N. Use the following DATA statement: 


DATA 257 
The output should look like this: 
X RAISED TO THE N = Y. 


3. Tom and Jerry want to play tic-tac-toe, but they need a tic-tac-toe 
board. Write a program to print out a tic-tac-toe board. Make the first 
vertical bar ten spaces from the left margin and the distance between 
the vertical bars, fifteen spaces. Use the same spacing for the 
horizontal bars. 


4. Vanderwhite Jewelers needs a program to accept five salespersons’ 
sales for each of three months. Output the total sales for each person 
and the total sales for all three months. Using nested loops, read in 
the following data: 


Dan Lafayette 1,998.30 2,547.00 1,743.55 
Mellisa Hayes 2,273.54 1,962.99 2,132.00 
David Wolcott 1,872.43 752.52 1,777.63 
Dennis Warncke 2,487.66 2,361.69 2,907.59 
Beth Daly 1,279.91 1,776.23 1,815.17 


Your output should have the following format: 
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SALESPERSON TOTAL 
XXXXXXXXXXKX $XXXXXXXXX 


TOTAL SALES $XXXXXXXXXX 


5. The wrestling coach at Musclebound High School has a tryout camp 


each year for the wrestling team. The coach likes to divide the 
potential team members into three groups based on the following 
chart: 


Weight Class 

Less than 150 pounds Lightweight 
150 pounds to 199 pounds Middleweight 
200 pounds or more Heavyweight 


You are to write a program using a WHILE loop that indicates in 
which class a person belongs. Use the following data: 


Name Weight 


Jim Lange 165 
Don Jackson 200 
Bob Bowman = 120 
Paul Smith 150 


. Given last month’s checking account balance, write a program to 


compute this month’s balance. Use the following data: 


Last month’s balance: 202.69 
Amount of checks written: 1.28, 58.98, 39.47, 81.67, 0.00 


Use a WHILE loop and the INPUT statement to enter the data. The 
WHILE loop should execute until 0.00 is entered as a check amount. 
The Output should follow this format: 


THIS MONTH’S BALANCE IS $XXXX.XX 
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Numbers 


Objectives After reading this chapter, the student should be able to do the following: 


m Understand and use the common ANSI standard library functions. 


w Define functions that are not already included in the BASIC language. 


Overview BASIC has numerous built-in functions that perform specific 
mathematical operations, such as finding the square root of a number or 
generating random numbers. These functions are useful to the 
programmer, who is spared the necessity of writing the sequence of 
statements otherwise needed to perform these operations. At other times, 
however, it may be useful for the programmer to define a function to 
meet the particular needs of an application. This chapter discusses these 
two tools: library functions (also called built-in, or predefined functions) 
and user-defined functions. 


Library Functions 


Table 7-1 lists the ANSI standard library functions found on most systems. 
The functions have been built into the BASIC language because many 
applications require these types of mathematical operations. The functions 
are included in the BASIC language library, where they can be referred to 
easily—hence, the name library functions. 

The general format for referencing a library function is as follows: 


function name(argument) 


In the function references in Table 7-1, the variable X is used as the argu- 
ment. In BASIC, the argument of a function can be a constant, a variable, a 
mathematical expression, or another function. These functions are used in 
place of constants, variables, or expressions in BASIC statements such as 
PRINT, LET, and IF/THEN. 


Trigonometric Functions 


The first four library functions in Table 7-1—SIN(X), COS(X), TAN(X), 
and ATN(X)—are trigonometric functions, which are very useful in math- 
ematics, engineering, and scientific applications. They use radian meas- 
ures of angles, since computers find them easier to understand than de- 
grees. People, however, prefer to use degrees. The following examples 
show how to convert from one unit to the other: 


Table 7-1 Common ANSI Standard Library Functions 


Function 


Purpose 


SIN(X) Trigonometric sine function, X in radians 


COS(X) Trigonometric cosine function, X in radians 
TAN(X) Trigonometric tangent function, X in radians 
ATN(X) Trigonometric arc tangent function, X in radians 
LOG(X) Natural logarithm function 

EXP(X) e raised to the X power 

SQR(X) Square root of X 

INT(X) Greatest integer less than X 

SGN(X) Sign of X 

ABS(X) Absolute value of X 


RND Random number between 0 and 1 


Functions 151 


1 radian = 57.29578 degrees. To convert 2.5 radians to 


: is degrees, multiply 2.5 by 
N radians = N * 57.29578 degrees. 57.29578. The product is 


about 143 degrees. 


p 1 degree = 0.01745 radians. To convert 180 degrees to 


N degrees = N * 0.01745 radians. pees a. oy 4 


radians (exactly equal to z). 


Exponentiation Functions 


The LOG(X), EXP(X), and SQR(X) functions deal with raising a number to 
a particular power. 


EXP (X) 


The exponential, or EXP (X), function makes the calculation EXP(X) = e”. 
The constant e is equal to 2.718. We will not dwell on e, but it is useful in 
advanced topics in science, mathematics, and business statistics. 


LOG(X) 


The natural logarithm, or LOG(X), function is the reverse of the EXP(X) 
function. For example, if X = e’, then LOG(X) = Y. In other words, Y (the 
LOG of X) is the power e is raised to in order to find X. If we know X but 
need Y, we can use the following BASIC statement to find it: 10 Y = 
LOG(X) 


SQR (X) 


The square root, or SQR(X), function determines the square root of an 
argument. In most BASIC implementations, the argument must be a posi- 
tive number. For example, 


X SQR(X) 
4 2 

16 4 

11.56 3.4 
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Mathematical Functions 


INT(X) 


The integer, or INT(X), function is used to compute the greatest integer 
less than or equal to the value specified as the argument. The integer 
function does not round a number to the nearest integer. If the argument is 
a positive value with digits to the right of the decimal point, the digits are 
truncated (cut off). For example, 


xX INT(X) 
8 8 
5.34 5 
16.9 16 


Be careful when the argument is a negative number. Remember the num- 
ber line: 


axe) me meri 0 1 2 3 


The farther left you go, the less value the number has. For example, 


x INT(X) 
=o —2 
—2.5 —3 
—6.3 —7 


Using INT (X) to Round. Although the INT (X) function does not round by 
itself, it can be used in an expression that rounds to the nearest integer, 
tenth, hundredth, or to any degree of accuracy wanted. The program in 
Figure 7-1 rounds a number to the nearest integer and the nearest tenth. 
Since the INT (X) function returns the greatest integer less than or equal to 
the argument, it is necessary to add 0.5 to the argument to round to the 
nearest integer (see line 110). Line 115 rounds the same number to the 
nearest tenth. We add 0.05 to A and then multiply that result by 10. The 
INT (X) function is then applied, and the result is divided by 10. 


SGN(X) 


The sign or SGN(X), function yields one of three possible values. If X > 0, 
SGN(X) = +1; if X = 0, SGN(X) = 0; and if X < 0, SGN(X) = —1. For 
example, 
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Figure 7-1 ROUNDING PROGRAM 


00100 PRINT "ORIGINAL NUMBER","NEAREST INTEGER","NEAREST TENTH" 
00105 READ A 
oOtNy ee = INT(A + 0.5) 
00 2 = INT((A + 0.05) * 10) / 10 
ASATs AZ 
00125 DATA 3.54 

Print 00999 END 

Headings 


Perform 
Calculations 


Print 
Results 


@ [ORIGINAL NUMBER NEAREST INTEGER NEAREST TENTH| 
5 


1 3.54 4 


xX SGN(X) 
8.34 FBS! 
0 0 
—3.5 ol 
0.5 ral 


This function might be used to quickly identify overdrawn accounts at a 
bank, as shown in Figure 7-2. After an account number and balance are 
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Figure 7-2. OVERDRAWN ACCOUNTS PROGRAM 


1S_OVERDRAWN 


read, the computer checks to see whether the balance is negative (line 25). 
If the balance is negative, the computer prints the overdrawn message; 
otherwise, the next account is read. 


ABS(X) 


The absolute value, or ABS(X), function returns the absolute value of the 
argument. The absolute value is always positive, even if the argument is a 
negative value. For example, 
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Figure 7-3 AUDIT SEARCH PROGRAM 


| 
| 


00010 READ N$,W 


oan Si 10 


00025 PRINT "WE SHOULD AUDIT ";N$ 
00030 DATA L. BUCKELL,999,H. DONELY,-39,S. MANDELL,-2090,R. PTAK,0.19 
00999 END 


X ABS(X) 
=2 2 

0 0 

3.54 3.54 
— 2.68 2.68 


We can use this function to identify all values that differ from a given 
value. For example, the Internal Revenue Service may want to know 
which individuals owe the government a substantial sum or are owed a 
substantial sum by the government. Figure 7-3 shows how the absolute 
value function might be used to help identify these individuals. Line 15 
tests for users who either owe at least $1,000 or are being refunded at least 
$1,000. 
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RND 


The randomize, or RND, function is used to generate a random number 
between 0 and 1. The term random means that any value between 0 and 1 
is equally likely to occur. This function is especially important in applica- 
tions involving statistics, computer simulations, and games. 


We can use the RND function to generate numbers greater than 1 by 
using it with other mathematical operations (see Figure 7-4). Suppose we 
need a random number between 10 and 20 instead of between 0 and 1. 
Line 15 in Figure 7-4 computes a random number between R11 (the lower 
limit in a selected range) and R2 (the upper limit in the range). 

Line 10 has two numbers read into memory. In line 15, the computer 
subtracts R2 from R1. The result is multiplied by a random number gener- 
ated by the RND function. Finally, that product is added to R2. Line 20 
finds the integer of R. 


Figure 7-4 RANDOM NUMBER PROGRAM 


. 18.05181 ° 


a a 
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Random Numbers 


At first it might not seem hard to make up numbers whose values are arrived at only by chance. However, this task is difficult for 
machines with precise structure and logic (such as computers). The various computer manufacturers use different methods for 
obtaining random numbers. You can obtain random numbers between 0 and 1 using each of our computers as follows. 


DECSYSTEM 20 


Two statements are needed with the DECSYSTEM 20 computer. The RND function needs no argument. The function used alone will 
give the same numbers each time a program is run; therefore, they are not truly random. Once you know that a program works the 
way you want it to, you should precede the statement containing RND by a RANDOMIZE statement. Now each time the program 
runs, RND will give a different unpredictable number. An example follows: 


00025 RANDOMIZE 


00070 LET X = RND 


Apple 
Only one statement is needed with the Apple microcomputer. The RND function needs an argument. A positive argument will return a 
random real number greater than or equal to 0 and less than 1. For example, 


10 LET X = RND(3) 
If the argument is 0, 
10 LET X = RND(0O) 


the most recently generated random number will be returned. A negative argument generates a particular random number that is the 
same every time RND is used with that argument. If an RND statement with a positive argument follows an RND statement with a 
negative argument, it will generate a particular, repeatable sequence of random numbers. 


LEARNING CHECK 


1. ______ are functions that have been built into the BASIC language. 
2. In BASIC, the argument of a function can be 
a. a variable 


b. another function 

c. amathematical expression 
d. all of the above 

e. aandc 


Pah : 3. The functions SIN(X), COS(X), TAN(X), and ATN(X) are called 
suonouny uoenuauodx3 *p 4. deal with raising a number to a particular power. 
suojouny oujawoucbuy “g | 5. The ______ function is used to compute the greatest integer less than or 
: PB] equal to the value specified as the argument. 
suonouny eid! “F | 6. The _____ function is used to generate a number between 0 and 1. 
| 
t 
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IBM/Microsoft 
Two statements are needed to give a truely random result with the IBM/Microsoft microcomputer (works similar to the RND function 
on the DECSYSTEM 20). The argument for RND is optional. An example follows: 


15 RANDOMIZE 
20 PRINT RND 


When the program is run, the computer prompts you with: Random number seed (—32768 to 32767)? You must enter a number 
within this range. Then the processing will continue. 


PET/Commodore 64 

Two statements are needed to give a truly random result with the PET/Commodore 64 microcomputer. The function RND needs an 
argument. RND(0) and RND(—N) should precede the use of RND(N). In other words, RND(O) and RND(—N) work much as 
RANDOMIZE does on the DECSYSTEM 20. 

An example follows: 


40 LET Y = RND(-RND(0)) 


85 LET X = RND(1) 


Now X should be a valid random number. Line 40 “seeds” the random number generator. 


TRS-80 
Two statements are needed with the TRS-80 microcomputer. An argument is needed for RND (you should use 0 to get a number 
between 0 and 1). An example follows: 


30 RANDOM 


140 LET X = RND(O) 


User-defined Functions 


The definition (DEF) statement can be used by the programmer to define a 
function not already included in the BASIC language. Once the function 
has been defined, the programmer can refer to it as a function when neces- 
sary. The DEF statement can be placed anywhere before the first reference 
to it. Its general format is as follows: 


line# DEF function name(argument) = expression 


The function name consists of the letters FN followed by any one of the 
twenty-six alphabetic characters. There can be only one argument. How- 
ever, an argument is not required within the DEF statement. The expres- 
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sion can contain any mathematical operations desired. However a function 
definition cannot exceed one line. 

When the computer encounters line 10 in the following program, it 
stores in memory the definition for the function FNR. Line 20 initializes B 
to 5. When the computer encounters line 30, it uses the definition for FNR 
and substitutes the value of B (5) for X in the expression (X + 20) / 2. The 
printed result is 12.5: 


RUNNH 
12.5 


Line 100 in Figure 7-5 defines a function to round a number to the 
nearest hundredth. After the values for name, wage, and hours have been 
read, the computer is instructed to calculate the salary and round it to 
the nearest hundredth. This is accomplished by substituting the result of 


Figure 7-5 CALCULATING SALARY 


EARNINGS 


Complete BASIC Programming 


W *« HR for Y in the expression defined in line 100. The result is then 
printed out 


LEARNING CHECK 


1. ______ are functions defined by the programmer that are not already includ- 
ed in the BASIC language library. 
2. The DEF statement can be placed 
a. after the reference to the function 
b. anywhere before the first reference to the function 


c. only on the line immediately preceding the reference to the function 
d. none of the above 

3. A function definition : 
a. cannot exceed one line 


Be '€ 
q 2% b. may be up to four lines 
SuUO!}oUN} Peuyap-asA) “| c. may be any length 
siomsuy 


A Programming Problem 


The Problem 


The ACME Sport Equipment Company manufactures leather basketballs, 
volleyballs, soccer balls, and softballs. The firm received orders this week 
for 10,000 baseballs, 5,000 volleyballs, and 250 softballs. The production 
manager needs to know how much leather will be needed to fill the or- 
ders. 


Solution Design 


If we know the radius of each type of ball ordered, we can figure out the 
total surface area to be constructed from leather. The formula for comput- 
ing the surface area of a sphere follows: 


Surface area = 4zr?. 
We can define a function in BASIC to compute this area as follows: 
FNA(RADIUS) = 4 * 3.1416 * RADIUS A 2 


The next step is to read the type of ball, its radius, and the number of 
each to be made. After the surface area is computed, we know how much 
leather is required to make one ball. By multiplying this value by the 
number ordered, we know how much leather is needed—in square inches. 
We must convert this result to square yards by dividing by 1,296 (the 
number of square inches in a square yard). 
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Figure 7-6 AREA OF LEATHER SPORT BALLS PROGRAM AND FLOWCHART 


The Program 


Line 130 of the program in Figure 7-6 defines a function, FNA, to compute 
the surface area of a sphere. The next several lines print the headings. 
Line 165 initiates the FOR and NEXT loop that reads the data, calculates 
the surface area, converts that result to square yards, and prints the re- 
sults. In line 175, the programmer refers to FNA to calculate the surface 
area. Line 205 marks the end of the FOR and NEXT loop. 
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Figure 7-6 = (continued) 


00100 REM *** THE AREA OF LEATHER SPORTS BALLS *** 
00105 DATA "BASEBALLS",2,10000,"VOLLEYBALLS",6,5000 
00110 DATA "SOFTBALLS",3.5,250 

00115 REM ¥#HHHHKHK KEKE 


00120 REM *** DEFINE FUNCTION TO COMPUTE SURFACE AREA OF BALL *** 
00125 REM ¥XX¥XHXHHKHHKX 


00135 PRINT 

00140 PRINT 

00145 PRINT "BALL TYPE","NUMBER","TOTAL AREA" 
00150 PRINT ,,"(SQ,. YARDS)" 

00155 PRINT 

00160 REM *** LOOP BEGINS HERE *** 

OOT65; ROR hes EOS. 

00170 READ B$,R,N 


00180 REM *** TOTAL AREA = NUMBER TIMES AREA OF EACH BALL *** 
00185 REM *** 1296 CONVERS TO SQUARE YARDS *** 

00190 EET ToS Nt A/S) 1296 

00195 PRINT BS,N,T 

00200 PRINT 

00205 REM *** LOOP ENDS HERE *** 

00210 NEXT | 

00999 END 


NUMBER TOTAL AREA 
(SQ. YARDS) 


| BASEBALLS 10000 
e 


| VOLLEYBALLS 5000 


! SOFTBALLS 250 29.69491 
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Summary 


m The BASIC language includes several library functions that can make 
complicated mathematical operations easier to program. 


= The trigonometric functions are SIN(X), COS(X), TAN(X), and ATN(X). 
= The exponentiation functions are EXP(X), LOG(X), and SQR(X). 
= Other mathematical functions are INT(X), SGN(X), ABS(X), and RND. 


= It is also possible for the programmer to define functions by using the 
DEF statement. 


Review Questions 


1. What are library functions? 

2. What are the allowable arguments of a function? 

3. Angles, when used as an argument to one of the four trigonometric 
functions, are measured in 
a. degrees 
b. centimeters 
c. radians 
d. degrees or radians 

. What are the four trigonometric functions? 

. What are the three exponentiation functions? 

. What does the EXP(X) function do? 

. What does the LOG(X) function do? 

. The argument X in SQR(X) can be 
a. any number 
b. any nonnegative number 
c. any positive whole number 
d. any negative number 

9. What does the function INT(X) do? 

10. What is the result of INT(—3.4)? 


11. Write a BASIC statement using the INT(X) function to round a 
number to the nearest thousandth. 

12. What possible values can SGN(X) return? 

13. The function ABS(X) always returns 
a. a number greater than or equal to 0 
b. a number less than or equal to 0 
c. a whole number 
d. an even number 

14. The RND function generates a random number between what two 
values? 


oN oo 
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Debugging Exercises 


15. 


16. 


17 


18. 
19. 


20. 


Identify the following statements and program segments that contain 


Write a BASIC program using RND to generate a random number 
between 1 and 25. 


What BASIC statement is needed to define a user-defined function? 


What are the rules for naming a user-defined function? 
How many arguments are allowed for a user-defined function? 


What limitations, if any, are placed on the length of a function 
definition? 


Where is the function definition statement placed within the 
program? 


rors, and debug them. 


i. 


00010 READ xX 

00020 LET Y = COS(X) 

00030 PRINT Y 

00040 REM *** DATA IS IN DEGREES *** 
00050 DATA 60 


00020 READ X 

00025 LET Y = SQR(X) 
00030 PRINT Y 

00035 DATA -169 


00010 READ X 
00015 LET Y = LOG(X * 2 +3 * X) 
00020 PRINT Y 
00025 DATA 3 


00100 INPUT "X = "5X 
00110 LET Y = EXP(X,5) 
00120 PRINT Y 


00035 READ X 

00040 LET Y = INT(ABS(X)) 
00045 PRINT Y 

00050 DATA -7.2 


10 DEF FNA(B,H) = .5 * Bi * H1 

20 INPUT "BASE AND HEIGHT OF TRIANGLE: ";B1,H1 
30 LET AREA = FNA(B1,H1) 

40 PRINT AREA 


00010 READ A 

00020 PRINT FNS(A) 

00030 DEF FNS(X) = ABS(X) - 256 
00040 DATA 5 
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8. 00025 REM *** HEADS OR TAILS *** 
00030 DEF FND = RND * (1 - 2) + 2 


00035 FOR | = 1 T0 5 
00040 PRINT INT(CFNP + 0.5) 
00045 NEXT | 


9. 10 READ A1 
15 DEF TAX(A) = A * .06 
20 LET T = Al + TAX(A1) 
25 PRINT T 
30 DATA 5.99 


10. 10 DEF FNVOL(S) = S * 3 
20 INPUT "SIDE OF CUBE = ";S1 
30 LET V = FNVOL(S1) 
40 PRINT V 


Additional Programming Problems 


1. The book company you work for needs a table of square roots and 
natural logarithms of the numbers from 1 to 100 for its new edition. 
Write a program to generate such a table. Round each entry to four 
decimal places. 


2. The new Midwestern Trust Bank has timed certificates available with 
8 percent interest compounded continuously. Write a program to 
compute the new balance for the customers listed in the following 
table. The formula for interest compounded continuously is A = Pe", 
where A is the final amount, P is the principal, e is the constant 
2.718, r is the interest rate, and t is time in years. Be sure to round to 
the nearest cent (hundredth) before printing. 


Name Principal _ Time (Years) 
Joe Brenner $10,000 3 
Barb Spangler 3,000 5 
Beverly Brice 7,000 2 
Dan Yarnell 5,000 4 
Jim Brown 12,000 1 


3. The local radio station surveyed ten people in its listening area to 
determine their opinion on a new program format. The following 
chart summarizes the results. Negative responses indicate dislike; 0, 
no opinion; and positive responses, approval. Using the SGN(X) 
function, determine the percentage with favorable responses, the 
percentage with no opinion, and the percentage with negative 
responses. Also determine the average response. 


survey Data. 24 422°-15302 42> —2 —=1 0. +1 +1 
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4. Write a program to compute the sine, cosine, and tangent of the 
angles 30, 45, 60, 90, 120, 135, 150, 180, 210, 225, 240, 270, 300, 315, 
and 360 degrees, as well as print a table. Use a function to first 
convert the angles to radians. (Remember: 1 degree = 0.01745 
radians.) 


5. You are computerizing the game of Yahtzee. Write a program to 
simulate the rolling of the five dice. (Hint: Use a function to simulate 
the rolling of a single die, and call it five times.) 


6. The local weather reporter needs a program to print the high, low, 
and average temperature for the day in degrees Celsius. The reporter 
takes a varying number of temperature readings in degrees 
Fahrenheit. (This number is recorded first in the DATA statement.) 
Write a program to accomplish this task, using a function to perform 
the conversion from degrees Fahrenheit to degrees Celsius. On this 
particular day, the temperature readings were 54, 62, 73, 80, 83, 81, 75, 
and 60. [Remember: The conversion formula is °C = 5/9(°F — 32).] 
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8 Subroutines and 
String Functions 


Objectives 


Overview 


After reading this chapter, the student should be able to do the following: 
@ Understand and use subroutines. 


@ Understand and use the STOP statement with subroutines and 
exception handling. 


@ Understand and use the string functions to manipulate strings. 


Sometimes it is necessary to have the computer execute an identical 
sequence of instructions at several different points in a program. The 
programmer need not write the set of instructions over and over again; 
instead, it can be placed in a subroutine. A subroutine is a sequence of 
statements, typically located at the end of the main program body; it 
performs a particular function and may be used in several different parts 
of the main program. By doing this, the instructions need only be written 
once. 

For example, Harry’s Haberdashery is having a year-end clearance 
sale offering a 25 percent discount on all men’s clothing. Harry would 
like a report that lists the sale price for each item, the amount of tax per 
item (the tax rate is 6 percent), and the total price of the item (including 
tax). When writing the solution to this problem, we find that the same 
procedure is needed to round the discounted price and amount of tax to 
the nearest penny. Instead of writing this rounding procedure two 
different times, we have written a subroutine that will be executed the 
required number of times. The program will transfer control to the 
subroutine and back to the main program through the use of two 
statements: GOSUB and RETURN. These statements, along with the 
STOP statement, the ON/GOSUB statement, and the string functions, 
will be discussed in this chapter. 


The GOSUB Statement 


The GOSUB statement is used to transfer the flow of control from the main 
logic of a program to a subroutine. The general format of the GOSUB state- 
ment is as follows: 


line# GOSUB line# 


The line number following GOSUB identifies the first statement of the 
subroutine. 

The GOSUB statement is something like an unconditional GOTO state- 
ment. The difference is that the GOSUB command also makes the com- 
puter remember where to return after the subroutine has been executed. 
Here is a typical example of a GOSUB statement: 


Figure 8-1 uses GOSUB statements in lines 195 and 225. Notice the line 
number of the subroutine. Subroutines often are assigned distinctive line 
numbers so that they are easier to locate. Although subroutines may be 
placed anywhere in a program, they are usually at the end, with a line 
number quite a bit higher than the line numbers in the main program. 
This leaves sufficient room for statements to be added to the main pro- 
gram. 


The RETURN Statement 


After processing within a subroutine has been completed, control must be 
transferred back to the main logic flow of the program. That is accom- 
plished by the RETURN statement. The general format of the RETURN 
statement is as follows: 


line# RETURN 


No line number need follow RETURN, because the BASIC interpreter re- 
members to return to the statement immediately following the most re- 
cently executed GOSUB statement. For example, 
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Figure 8-1 
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CLOTHING DISCOUNT PROGRAM 


Print 
Headings 


Assign 
Values to 
Variable 


Perform 
Calculations 


Perform 
Rounding 
Subroutine 


Perform 
Calculations 


Perform 
Rounding 
Subroutine 


Stop 
Main Program 


Perform 
Calculations 


Print 
Results 
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Start 
Subroutine 


Perform 
Calculations 


Stop 
Subroutine 


Figure 8-1 = (continued) 


00100 REM *** THIS PROGRAM GIVES DISCOUNT FRICES *** 
00105 REM *** ROUNDED TO THE PENNY ¥*** 
00110 DATA "SUITS",189.95,"SHIRTS",14.99,"SLACKS",21.50 
00115 DATA "SOCKS",2.19,"UNDERWEAR",6.49,"TIES",9,99 
00120 PRINT 
00125 PRINT 
00130 PRINT 
00135 PRINT "ITEM","SALE PRICE","TAX","TOTAL" 
00140 REM *** DISCOUNT RATE = 25% **#* 
OO145( ETI Ds .29 
00150 REM *** TAX RATE = 6% *** 
OO155 (LET. R=: 06 
00160 REM *** BEGIN LOOP HERE *** 
00165 FOR | = 1 TO 6 
00170 READ N$,P1 
00175 Lo MUG ea Ad PVN 3B | 
00180 REM *** NEW PRICE *** 
00185 LET ux. 2 PZ 
190 REM *** ROUND DISCOUNT PRICE *** 


00200 LET P2 = X 
00210 LET T= P2*R 

Oozio LET Xe: T 

00220 REM *** ROUND TAX *** 
00225 GOSUB 1000 


00230 (Elson Oa re 6 

00235 REM *** TOTAL = NEW PRICE + TAX ##* 
00240 CET Tiss RZcElE 

00245 PRINT 

00250 PRINT N$L"S"3;P2,"$"5T,"S"571 

00255 REM *** END OF LOOP ##* 

00260 NEXT | 

00265 PRINT 

00270 PRINT 


01000 REM XH KKK HH KEK HX 


01005 REM *** SUBROUTINE TO ROUND TO NEAREST CENT *** 
01010 REM K¥RHHH HHH ERK HHH 


01015 LET X = 100 * X + .05 
01020 LET X = (INT(X)) / 100 


09999 E| 


SALE PRICE 
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The STOP Statement 


The RETURN statement in line 550 sends control back to the instruction 
following the GOSUB statement that called the subroutine, so the RE- 
TURN statement in line 550 sends the computer back to line 60. The 
RETURN statement in line 1025 of Figure 8-1 will return control to line 
200 if the subroutine was called in line 195. If the subroutine was called in 
line 225, control will be returned to line 230. 


The STOP statement halts execution of a program; it is placed wherever a 
logical end to a program should occur. The general format of the STOP 
statement follows: 


line# STOP 


The STOP statement differs from the END statement in that STOP can 
appear as often as necessary in a program, whereas the END statement can 
appear only once and must have the highest line number in the program. 


Using STOP with Subroutines 


One of the major uses of the STOP statement is with subroutines. For 
convenience, subroutines generally are placed near the end of a program, 
but the subroutine may be referred to several times in the program. A 
STOP statement usually is placed just before the beginning of the first 
subroutine to prevent unnecessary execution of the subroutine when the 
computer comes to the logical end of the program. Figure 8-1 illustrates 
how the STOP statement is used before subroutines (line 275). 


Using STOP with Exception Handling 


Many programs contain exception-handling instructions. These sequences 
of statements help the computer prevent the input of invalid data, which 
is referred to as a garbage in—garbage out error. The STOP statement can 
be used to stop execution of a program after such a sequence has been 
executed. 

Figure 8-2 calculates the common logarithm of a number. Since the 
computer can find the logarithms of positive numbers only, the program 
includes an exception-handling instruction in line 155. If the user of the 
program enters a number less than or equal to 0, the computer will branch 
to line 240, print an error message, and stop processing. Notice that this 
program also contains a stop statement in line 220; this is the logical end of 
the main program. In lines 205 through 215, the user is directed to input Y 
to continue finding the logarithms of numbers. If the user does not wish to 
continue finding the logarithms of numbers, he or she types N, and pro- 
gram execution ends. The STOP statement prevents subsequent lines from 
being executed (and thus prevents the error message from being printed 
unnecessarily). 
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Figure 8-2. EXCEPTION HANDLING 


(Continued next page) 
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Figure 8-2 (continued) 


ETURNS THE B. 
NUMBER 


WHOSE LOG YOU WANT 
OF 25. = 1.39794 
DO THIS AGAIN? (Y OR N). 
: WHOSE LOG YOU WANT 
10000 
HE COMMON LOG OF 10000 = 4 
. DO THIS AGAIN? (Y OR N) 


WHOSE LOG YOU WANT 


The ON/GOSUB Statement 


The ON/GOSUB statement is used to conditionally transfer control to one 
of several subroutines. Here is the general format for the ON/GOSUB 
statement: 


line# On expression GOSUB line#1, line#2, line#3, ... line#n 


The ON/GOSUB statement operates in the same way as the ON/GOTO 
statement. The difference is that the line numbers to which control is 
transferred are not lines in the main program; they are subroutines. The 
line number to which control is transferred depends on the evaluation of 
the expression. The arithmetic expression is always evaluated to an inte- 
ger. If, for instance, the expression evaluates to 2.8 (a real number), the 
decimal fraction automatically will be truncated so that the expression 
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equals 2. (Some systems round the real number, so this would evaluate to 
3. Check your manual.) 
The general execution of ON/GOSUB proceeds as follows: 


1. If the value of the expression is 1, control is transferred to the 
subroutine located at line number 1. 


2. If the value of the expression is 2, control is transferred to the 
subroutine located at line number 2. 


n. If the value of the expression is n, control is transferred to the 
subroutine located at line number n. 


The following example illustrates the operation of the ON/GOSUB 
statement: 


Computer execution is as follows: 


If X / 10 = 1, control is passed to the subroutine at line 200. 
If X / 10 = 2, control is passed to the subroutine at line 250. 
If X / 10 = 3, control is passed to the subroutine at line 300. 


The last statement in these subroutines should be RETURN. When the 
computer executes the RETURN statement, control is transferred back to 
the line immediately following the last ON/GOSUB or GOSUB statement 
executed. 


BAe web SD re eo AP Ra Pa Sie Ot ee nee odin oe a 
ON/GOSUB Errors 


Action Taken If Number Evaluated Is 
Greater Than Number of Line Numbers 


Action Taken If Number Evaluated Is Less Than 1 
or Greater Than Maximum Allowed 


DECSYSTEM 20 ‘258 ON statement out of range”’ “258 ON statement out of range” 


Apple BASIC continues with the next executable line “lllegal quantity error in 20" 
IBM/Microsoft BASIC continues with the next executable line “Illegal function call’ error 
TRS-80 BASIC continues with the next executable line “FC error in 20" 
PET/Commodore 64 BASIC continues with the next executable line “Illegal quantity error in 20" 


Subroutines and String Functions 177 


178 


00g * 
€@NSOD/NO * 
a4 


NYNL3y 
gNsod * 


siomsuy 


ran ew 


String Functions 


LEARNING CHECK 


. The _______ statement is used to unconditionally transfer the flow from the 
main line of the program to a subroutine. 
After processing within a subroutine, control is transferred back to the main 
logic flow of the program by the _______ statement. 
. The STOP statement may —____.. 
. be placed wherever a logical end to the program should occur 
. only appear once in the program and have the highest line number 
. be placed just before subroutines to prevent unnecessary execution of 
subroutines 


d. all of the above 
e. aandc 
. The _______ statement is used to conditionally transfer control to one of sev- 
eral subroutines. 
. What is the line number of the subroutine to which control will be transferred 
when Z = 2? 


00100 ON Z GOSUB 200,300,400 


Up to this point, we have manipulated numbers but have done little with 
strings except print them out or compare them in IF and THEN tests. Many 
business applications require more sophisticated manipulations of strings. 

A string is simply a series of alphanumeric characters such as #OJQ$P 
or HORNBLOWER, H. Usually, BASIC requires that quotation marks be 
placed around strings. 

BASIC string functions allow programmers to modify, concatenate (join 
together), compare, and analyze the composition of strings. These func- 
tions are useful for sorting lists of names, finding out subject matter in 
text, printing mailing lists, and so forth. For example, we can help the 
computer understand that John J. Simmons is the same as Simmons, John J. 
The most common string functions are listed in Table 8-1. 


The Concatenation Function 
It is possible to join strings together using the concatenation function. In 


business this is often desirable when working with names or addresses. 
The program in Figure 8-3 demonstrates what happens: 


Complete BASIC Programming 


Table 8-1 STRING FUNCTIONS 


Example 


Basic String Function 


Concatenates; joins two strings together KUNG + FU is KUNGFU 

Finds the length of a string If H$ is HELLO HOWARD, then 
LEN(H$) is 12 

Returns the number of leftmost characters of a LEFT$““ABCDE'",2) is AB 

string specified by the expression 


string 1$ + string 2$ 
LEN(string) 


LEFT$(string,expression) 


RIGHT$(string,expression) Returns the rightmost characters of a string, RIGHT$(""ABCDE"2) is BCDE 
starting with the character specified by the 
expression 

MID§$(string,expression 1,ex- Starting with the character at expression 1, MID$("ABCDE”’ 3,2) is CD 


returns the number of characters specified by 
expression 2 
Returns the ASCIl code for the first character in If A$ contains DOG, then 


pression 2) 


ASCil(string) }v 0 


q the string ASCIK(A$) is 68 
CHR§(expression) © he: (2 Returns the string representation of the ASCII IF CHR$(F$) > Z, THEN then 20 
code of the expression 
VAL(expression) Returns the numeric equivalent of the string X = VAL(H$) 
expression 


STR$(expression) Converts a number to its string equivalent X$ = STR(123) 


The LEN Function 


The LEN function returns the number of characters in the string. An ex- 
ample of how the LEN function might be used is given in Figure 8-4. 

In this example, if the value in H$ is less than fourteen characters long, it 
can be printed within the predefined print zones. Otherwise, we might 
wish to use the TAB function to print out the next value. 


The LEFT$ and RIGHTS Functions 


The LEFT$ function returns the number of characters specified in the 
argument starting from the beginning of the string. The RIGHT$ function 
returns a substring, which starts with the character specified by the ex- 
pression. The LEFT$ and RIGHTS functions are illustrated in Figure 8-5. 
In this example, the computer stores a character string in B$. Line 20 tells 
the computer to print the first six characters of B$. Line 30 tells the com- 
puter to start printing with the eighth character. | re han- 


microcomputers, the instruction 
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Figure 8-3. CONCATENATION 
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Figure 8-4 THE LEN FUNCTION 


ENTER ANY STRING ? HOT FUDGE 
ENTER ANY NUMBER ? 3 
SHOT FUDGE SUNDAE 3 


STOP at line 00030 of MAIN PROGRAM) 


30 PRINT RIGHTS(BS,8) 


instructs the computer to print the last eight characters of the string. The 
output would look like this: 


HAVE A 
IFIC DAY 


The LEFT$ function is often useful when comparing character strings. 
Suppose a program asks the user to answer a yes or no question but does 
not specify whether the question should be answered by typing the entire 
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Figure 8-5 THE LEFT$ AND RIGHTS FUNCTION 


word YES or NO or just the first letter Y or N. We can use the LEFT$ 
function to compare just the first character of the user’s response, allowing 
the user to type either YES/NO or Y/N. The program in Figure 8-6 illus- 
trated this. 


The MID$ Function 


The MID$ function is more complicated. Here is the general format: 


(line# MID§(string, expression# 1, expression# 2) 


fi I 


String Constant or Variable Starting Point in String Number of Characters to Be Returned 


Sometimes expression 2 is omitted; in that case, the characters—from the 
starting point to the end of the string—are returned. This function is use- 
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Figure 8-6 COMPARING CHARACTER STRINGS 


00010 INPUT "ARE YOU MARRIED ";A$ 


0030 IF A$ = "Y" THEN PRINT "YES" ELSE PRINT "NO" 
00099 END 


RUNNH 


ARE YOU MARRIED ? YES 


YES 


ful when you want to look at some middle characters of a string. For 
instance, assume you have a file of telephone numbers, and you want to 
print out only those with an exchange of 352. Here are the telephone 
numbers: 


491-354-1070 
491-353-0011 
491-352-3520 
491-352-1910 
491-352-7350 
491-353-9822 


The program in Figure 8-7 will compare the exchange to “352” and print 
the telephone numbers that qualify: 


The ASCII and CHR$ Functions 
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Figure 8-7 THE MID$ FUNCTION 


e| 
| 491-352-3520 
171-352-1910 


| 
o| 491-352-7350 {@ 


| | 
a! 
| | 


argument must be a variable name. Figure 8-8 lists characters and their 
corresponding ASCII value. An example is shown in Figure 8-9. 

The CHR$ function works just the opposite of the ASCII function. This 
function returns the character that corresponds to the decimal ASCII value. 
The program in Figure 8-10 illustrater the use of the CHR$ function. 

The ASCII and CHR$ functions are helpful in allowing programs to 
respond to both lowercase and uppercase input. By using these functions, 
we can write a program that will allow the user to answer a yes or no 
question with either y or Y and n or N. Looking at Figure 8-3, you can see 
that lowercase letters range from 97 to 122, and uppercase letters range 
from 65 to 90. An IF/THEN statement can be used to compare the ASCII 
value to 96. If the value is greater than 96, a lowercase letter has been 
typed; if the value is less than 96, the letter is uppercase. Once you know 
what type of letter you have, it can be converted to either uppercase or 
lowercase for comparison. An uppercase letter can be changed to lower- 
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Figure 8-8 ASCIl CODES 


" 
& 
* 


—xK +0 —-s,a er XAHDUR TOe@eA@eSROY TS 
<caoB-OouUKxCcoz=—MFnrov-!'i-Re 
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Figure 8-9 THE ASCII FUNCTION 
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Figure 8-10 THE CHR$ FUNCTION 


(00090 PRINT 


case by adding 32 to the ASCII value, and a lowercase letter can be 
changed to uppercase by subtracting 32. 

The program segment in Figure 8-11 illustrates this use of the ASCII 
and CHR$ functions: 
This program segment checks the user’s reply to see if it is lowercase. If it 
is lowercase, 32 is subtracted from the ASCII value to give the ASCII value 
for the uppercase of the same letter. After subtracting, CHR$ assigns the 
character corresponding to the ASCII value to A$. A$ then can be com- 
pared with uppercase characters. 


The VAL Function 
The VAL function turns a numeric string (for example, 5280) into a num- 


ber that can be used in arithmetic calculations. Figure 8-12 illustrates this. 
By using the VAL function, it is possible to change the number in charac- 
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Figure 8-11 CONVERTING LOWERCASE LETTERS TO UPPERCASE LETTERS 


00100 INPUT "ARE YOU ALLERGIC TO ANY MEDICATIONS? (Y OR N)";A$ 


00130 IF A$ <> "Y" THEN PRINT "NO ALLERGIES" 


MEDICATIONS? (Y OR N) ? ne 


ter string format to a real number so that the number can be used in 
mathematical computations. If the character string contains any nonnu- 
meric characters, the VAL function will replace these with zeros. 
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Figure 8-12 THE VAL FUNCTION 


00010 INPUT “ENTER A NUMBER STRING";N$ 


00030 PRINT "THE STRING NUMBER IS ";N$ 

00040 PRINT "THE REAL NUMBER IS ";A 

00050 PRINT “THE REAL NUMBER MAY BE USED IN" 
00060 PRINT "ARITHMETIC OPERATIONS A / 2 =";A / 2 


» RUNNH 

ENTER A NUMBER STRING ? 5280 
F THE STRING NUMBER 1S 5280 

B THE REAL NUMBER 1S 280 


5 
Bm THE REAL NUMBER MAY BE USED IN 
SB ARITHMETIC OPERATIONS A / 2 = 2640 


The STR$ Function 


The STR$ function is just the opposite of the VAL function; it converts a 
real number to a string. Figure 8-13 illustrates the STR$ functions. 
Remember that once a number has been converted to a character string, it 
no longer can be used in mathematical computations. 
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Figure 8-13. THE STR$ FUNCTION 


LEARNING CHECK 


$ULS ° 
asje4 °s 
$YHO ‘IOS 
ale: * 
N31 @ 
UOIeUa}BOUDD * 


oMS 


is the joining together of strings. 


2. The _________ function returns the number of characters in a string. 
. What value is assigned to T$ by the following instruction? 


10 LET T$ = MID$( “419-372-4448” ,5,3) 


The ______ function returns the decimal value of the first character specified 
in the string argument, whereas the ________ function returns the character 
that corresponds to the decimal ASCII value. 

The VAL function turns a number into a numeric string. TRUE FALSE (Circle 
the correct answer.) 


. The ________ function converts a real number into a string. 


Subroutines and String Functions 


189 


A Programming Problem 
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The Problem 


We want to write a program that will ask the user for the following infor- 
mation: 


. Name to be input in this format: first, blank, last. 

. Month of birth (for example, 02). 

. Day of birth (for example, 04). 

. Year of birth (for example, 1963). 

. Sex (allow user to type either the full word or the first letter). 

. Current date in the format mm/dd/yy (for example, 08/16/83). 


ao a Fr WwW DN 


The date of birth should be put into the same format as the current date so 
that they can be compared. Using the ON/GOSUB statement, we will print 
the appropriate message: either “HAPPY nth BIRTHDAY first name” or 
“first name, YOUR BIRTHDAY ISN’T UNTIL mm/dd.” 

The output will have the following format: 


LAST, FIRST SEX = mor f 
BORN mm/dd/yy 

blank line 

appropriate birthday message 


Solution Design 


. Collect information. 

. Switch name so that the last name comes first. 
. Put birthday in mm/dd/yy format. 

. Compare birth date to current date. 

. Assign 1 to X if birthday. 

. Assign 2 to X if not birthday. 

. Use ON/GOSUB to transfer control. 

. Print appropriate message. 


On Oa Fr WO DN 


The Program 


In the program in Figure 8-14, lines 150 through 175 ask the user for data. 
Line 190 initializes I to 0. Line 195 increments I. Line 195 picks off the 
leftmost I characters and places them in L$. Line 205 picks off the right- 
most character of L$. Line 215 tests whether T$ is a blank by using the 
CHR$ function (the ASCII code for a blank or space is 32). If a blank is 
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(aBed jxau panuyjuos ainbi4) 


LHYVHOMO14 GNY WWYH9O¥d AVGHLYIG GNV SWVN-svt-8 eunbiy 
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Figure 8-14 (continued) 


00100 REM 
00105 REM 
00110 REM 
00115 REM 
00120 REM 
00125 REM 
00130 REM 
00135 REM 
00140 REM 
00145 REM 
00150 INPUT "ENTER YOUR NAME, FIRST THEN LAST ";N$ 

00155 INPUT "ENTER MONTH OF BIRTH (e.g. 02 FOR FEB.) ";M$ 
00160 INPUT "ENTER DAY OF BIRTH (e.g. 04) ";D$ 

00165 INPUT "ENTER YEAR OF BIRTH (e.g. 1963) ";Y$ 

00170 INPUT "ENTER SEX MALE OR FEMALE ";S$ q 
00175 INPUT "ENTER TODAY'S DATE (e.g. 08/16/83) ";C$ Date 
00180 REM *** SWITCH NAME SO LAST NAME COMES FIRST *** 

00185 REM *** SEARCH LOOP UPTO LENGTH OF NAME *** 

00190 LET | = 0 

O0T9S BETA = oblate A 


00709 ter Bee TEST, FOR BLANK #2% 


00220 REM *** IF NOT BLANK THEN CONTINUE Loop **x So 1? (79 
OOZSO LET URS = PRIGHTSINS TOF LY A085 MLS) serch 


NAME (FIRST NAME FIRST) *** 
MONTH OF BIRTH *** 

DAY OF BIRTH *** 

YEAR OF BIRTH *** 

SEX *¥¥* 

CURRENT DATE *** 

BIRTH DATE *** 

REVERSED NAME *** 


noun wn noon 


00235 PRINT 

00240 PRINT 

00245 PRINT R$;" pe 

00250 REM *** COMPARE SEX *** 


00260 REM *** PUT TOGETHER DATE OF BIRTH *** 


lasT 2 Char, 
00270 LET B$ = M$ + "/" + D$ + "/" + Y$- 
00275 PRINT "BORN ";B$ 


00295 REM *** SUBROUTINE TO PRINT BIRTHDAY MESSAGE *** 


00310 LET A'= C - B 

00315 PRINT 

00320 PRINT "HAPPY";A;"BIRTHDAY ";L$ 
00325 PRINT 

00330 PRINT 


00340 REM *** SUBROUTINE FOR NO BIRTHDAY *** 


00350 PRINT 
00355 PRINT L$;", YOUR BIRTHDAY ISN'T UNTIL ";X$ 
00360 PRINT 
00365 PRINT 


00999 END 
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Figure 8-14 (continued) 


p . 
ENTER YOUR NAME, FIRST THEN LAST ? BOB SZY 
INTER MONTH OF BIRTH (e.g. 02 FOR FEB.) 7? 06 
ENTER DAY OF BIRTH (e.g. 04) ? 0 
INTER YEAR OF BIRTH (e.g. 1963) 
ENTER SEX MALE OR FEMALE ? M 

ER TODAY'S DATE (e.g. 08/16/83) ? 06/04/83 


MANSKI, BOB SEX = M 
APPY 27 BIRTHDAY BOB. 


OP at Iine 00290 of MAIN PROGRAM 


found, line 215 sends the computer to line 230, which assigns the reversed 
name to R$. The name is printed out in reverse by line 245. Notice that the 
PRINT statement is ended with a semicolon so that the next PRINT state- 
ment will be continued on the same line. Line 255 compares the first 
character of the reply for M or F and prints out the sex. Line 265 assigns 
the last two numbers of the year of birth to Y$. Line 270 then puts the birth 
date into the same format as the current date. After the birth date is printed 
out in line 275, line 280 compares the dates (only month and day). If they 
are the same, line 440—an ON/GOSUB statement—transfers control to 
line 295. If they are not equal, control is transferred to the subroutine at 
line 340. Line 290 contains the STOP statement to keep the subroutines 
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from being executed unnecessarily. The subroutine starting at line 295 — 
prints the happy birthday message, Lines 300 and 305 convert the years to — 
integers so that they can be subtracted in line 310 to find the individual’s — 
age. Lines 315 through 330 print the output, and control is then transferred — 
back to the main program by the RETURN statement in line 335. The — 
second subroutine, which is executed when the individual does not havea — 
birthday, starts in line 340. The month and day of birth are assigned to X$ — 
im line 345, and lines 350 through 365 print the output. After control is — 
returned to the main program (this is done by line 370 in the second sub- — 
routine), the first statement to be executed is the STOP in line 290. Execu- — 
tion of this statement results in the message STOP at line 290 of the main ~ 
program. 


= Two statements define a subroutine: GOSUB and RETURN. 
= The GOSUB statement is used to transfer the flow of control from the 


main logic of a program to a subroutine. 


m The RETURN statement transfers control from a subroutine back to the 


line in the main program immediately following the last GOSUB or ON/ 
GOSUB statement that was executed. 


= The STOP statement halts execution of a program. 


= The ON/GOSUB statement is used to conditionally transfer control 
from the main program to one of several subroutines. 


= BASIC string functions permit modification, concatenation, comparison, 
and analysis of the composition of strings. 


1. What is the purpose of using subroutines? 
2. What does the GOSUB statement do? 


3. Identify which of the following are valid GOSUB statements: 
a. 170 GOSUB b. 210 GOSUB 600 


900 REM SUBROUTINE 600 REM SUBROUTINE 
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c. 125 GOSUB 950 d. 340 GOSUB 1000 
800 REM SUBROUTINE 800 REM SUBROUTINE 


950 REM SUBROUTINE 


. What is the purpose of the RETURN statement? 

. Where is the RETURN statement placed in a program? 

. What is the difference between the STOP and END statements? 

. How is the STOP statement used with subroutines? 

. What is the purpose of using the STOP statement with exception 
handling? 

9. What is the difference between the GOSUB statement and the ON/ 

GOSUB statement? 


10. If X equals 3, what is the line number of the subroutine to which 
control will be transferred when the following line is executed? 


Son oOo 


240 ON X GOSUB 300,350,400,450 
11. Is line 100 a valid ON/GOSUB statement? Why or why not? 


90 LET Z = 4 
100 on Z GOSUB 200,250,300 


200 REM SUBROUTINE 
250 REM SUBROUTINE 
300 REM SUBROUTINE 


400 END 
12. Write a BASIC statement that will join A$ and B$ to produce C$. If 


A$ = “EDWARD” and B$ = “ ERLANGER”, what will C$ be equal 
to after this statement is executed? 
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_13. After the following statement is executed, what does R equal? 
20 LET R = LEN(“123 SANDRIDGE RD”) /©& 


14. Using the LEFT$ function, change the value of A$ from 
“COMPUTER” to “COMPUTATION”. finite tyr 64,9) 


15. Give the output from the following statement: 
10 PRINT RIGHT$(“MICHAEL JACKSON”,9) °° ICSon 


16. Give the output from the following statement: 

20 PRINT MID$(““MICHAEL JACKSON”,9,4) °“ ae 

17. Using Figure 8-3, what will this instruction print out? 
10 PRINT ASCII(APPLE) 

18. What will this instruction print? 


20 PRINT CHR$(75) + CHR$(97) + CHR$(114) + CHR$(101) + 
CHR$(110) 


19. What is the purpose of the VAL function? 
20. What will the output from this instruction be? 


30 PRINT STR$(342) + STR$(58) 


Debugging Exercises 


Identify the programs or program segments that contain errors, and debug 
them. If output is given, correct the program or segment so that it will give 
the desired output. 


1. 00010 GOSUB 150 
00015 STOP 
00100 REM *** SUBROUTINE *** 
00105 PRINT "HELP" 
00110 RETURN 
00999 END 


2. 00010 GOSUB 300 
00020 PRINT Z 


00290 STOP 

00300 REM *** SUBROUTINE *** 
00310 PRINT Z * 2 

00999 END 
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3. 00010 LET X = 4 
00020 ON X GOSUB 100,200,300 


00100 REM *** SUBROUTINE *** 


00200 REM *** SUBROUTINE *** 


00300 REM *** SUBROUTINE *** 


00999 END / 0) 


4, 00010 LET A$ = "FOM"" 


Leet (T 


00015 LET B$ = "TERRIFIC" Lone! 
00020 LET C$ = A$ + ‘+ BS 
00025 PRINT C$ 


RUNNH 
T. TERRIFIC 


5. 00010 LET x$ =" 
00015 LET A$ = LEFTS(X$,LEN(X$) / 2) 
00020 LET BS = RIGHT$(X$,LEN(X$) / 2 + 1) 
00025 PRINT A$ 
00030 PRINT B$ 


6. 10 REM *** LIST PEOPLE WITH MIDDLE INITIAL A *** 
20 FOR | = 1 T0 5 


30 READ N$ L 

40 FOR J = 170 5 s 

50 LET L$ = LEFTS(NS$,4) 

60 LET R$ = RIGHTS(L$,1) 

70 IF : ae " THEN 90 

80 NEXT 

90 IF MIDSCNS 51 + 1,1) = "A" THEN PRINT N$ 
100 NEXT | 


110 DATA "KAREN ANNE MCKEE","JOHN DANIEL MANN" 
120 DATA "ERIC ALEXANDER RED" 

130 DATA "ALICE KAY OTTEN","BOB ALAN SZYMANSKI" 
140 END 


RUNNH 

KAREN ANNE MCKEE 
ERIC ALEXANDER RED 
BOB ALAN SZYMANSK|! 
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7. 00005 FOR | =1 TO 3 
00010 READ A$ 
00015 LET A = STRS(AS$) 
00020 LEV A wen /- 2 
00025 PRINT A 
00030 NEXT | 
00035 DATA 596,634,310 


RUNNH 
298 317 155 


\ / 
8. _. 00010 PRINT "HELLO" 


i 
RUNNH 
"HELLO" 
9. 00010 INPUT "ARE YOU 21 OR OLDER?";A$ 
Oh 00015 IF A$ <> "YES" THEN GOTO 999 


00020 INPUT "ENTER AGE";N$ y- Uar(W &) 
00025 LET N=N* 2 

00030 PRINT "YOU ARE ELIGIBLE FOR $"3N 
00999 END 


RUNNH 
ARE YOU 21 OR OLDER?? Y 


ENTER AGE? 32 
YOU ARE ELIGIBLE FOR $ 64 


10. 00010 PRINT ASCII(A),ASCI1(B),ASCII(C) 


RUNNH 
64 65 66 


Additional Programming Problems 


1. Write a program to compute the gross pay of hourly employees. If the 
employee works more than forty hours, this program should call a 
subroutine that will calculate the overtime pay: 


(Hours worked — 40) X 1.5 X Wage rate) = Overtime pay. 
Use this data: 


Name Hours Wage 

Tim Novak 45 $10.90 
Edwin Peter 39 8.65 
Dave Lee 47 9.30 
Joe Szchmit 33 5.15 
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The output should have this format: 


NAME HOURS GROSS PAY 
XXXXX XX $XXX.XX 


2. Write a program to print any word entered by a user in one of these 
three formats: 


FIVE FIVE re 
FIV IVE I 

FI VE V 
F V E 


Subroutines should be called by an ON/GOUSB statement to print 
the word in the format specified by the user. 


3. Write a program that reads a list of words and prints only those words 
that begin with whatever prefix is entered by the user. Use the 
following data: PREPARE, PREFIX, INTEREST, INCOME, UNDER, 
UNFORTUNATE, PROFFER, PROGRAM, PROFESSIONAL 


4. The gas company has its customer names on file in the format of last 
name, first name, and middle initial. It needs a program that will 
reverse the names so that they are printed on the customer’s bill in 
the format of first name, middle initial, and last name. Here is a list of 
customers: 


Customer Name 


Hough, Charlie J. 
Niekro, Joe G. 
Stilwell, Hazel Z. 
Miller, Risa A. 
Wilhelm, Hoyt H. 
Rudolph, Wilma P. 


5. Write a program to print a chart of the capital letters from A to Z and 
their corresponding ASCII value in the following format: 


CHAR VALUE CHAR’ VALUE 


A 65 B 66 
C 67 D 68 
Y 89 Z 90 
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No data are needed. Use a FOR/NEXT loop that starts with the ASCII 
value of A and goes to the ASCII value of Z. 


6. The residents of Morton Avenue want to add 100 to their street 
addresses. They need a program to change their current addresses 
and list their new addresses. Read these addresses into a string 
variable, and add 100 to each house number: 


35 Morton Avenue 
41 Morton Avenue 
67 Morton Avenue 


OUTPUT: 


135 Morton Avenue 
141 Morton Avenue 
167 Morton Avenue 
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Overview 


After reading this chapter, the student should be able to do the following: 


m@ Understand the function of subscripts. 
m Understand and use the DIM statement. 
m@ Program and manipulate one- and two-dimensional arrays. 


m Sort data items using both the bubble and Shell sorts. 


So far, our programs have used simple variables such as A, N$, and D2 
to represent single values. Now let us say we want to write a program 
that reads the daily television viewing hours for five people, calculates 
the average, and prints the difference between each person’s viewing 
time and the average in the following format: 


Up to this point, we have been calculating averages by reading one 
value at a time into a single variable when using the READ/DATA 
statements and accumulating the values as they are read. In this 
procedure, however, each time a new value is read, the previous value 
stored in the variable is destroyed; thus, in the previous example, we 
would not be able to compare each person’s viewing time with the 
calculated average viewing time. To make the comparison, each person’s 
viewing time would need to be stored in a separate memory location. 
One way of accomplishing this is by using a distinct variable name for 


Figure 9-1 = (continued) 


REM Eee T.V. VIEWING HRS. SURVEY *** 


NEXT | 

EET eats Ts 5 

PRINT "NAME","VIEWING HRS.","DIFFERENCE FROM AVERAGE" 
FOR |! = 1 T0 5 


AA 


00085 PRINT 

00090 PRINT 

00095 PRINT "AVERAGE DAILY VIEWING HRS. = "3A 

000100 DATA "M. STOOTS",5,"B. KOOL",3,"K. DAVIS",6,"H. WARD",4,"V. JONS",2 
00999 END 


Array names are distinguished from simple variable names through 
the use of subscripts. The DIM statement tells the computer how much 
storage is necessary to hold an array. Arrays may be one-dimensional 
(sometimes called lists), two-dimensional (often called tables, or ma- 
trices), or of higher dimensions. A method for sorting arrays also is 
discussed in this chapter. 


Subscripts 


An array is a group of storage locations in memory in which data elements 
can be stored. The entire array is given one name; the programmer indi- 
cates individual elements in the array by referring to their positions. The 
general concept is simple. Let us say there are three students in a com- 
puter science class. We would like to store the names of the students in an 
array called C$. It might look like this: 


Array C$ 


C$(1) JONNY 
C$(2) RACHEL 
C$(3) SUE 


We can gain access to an individual name within the array by telling the 
computer which position in the list it occupies. This is done through the 
use of subscripts. For example, Jonny is in the first position in the array— 
that is, C$(1). Rachel is in the second location, C$(2). Sue is in C$(3). The 
subscripts are enclosed in parentheses. 

In BASIC, the same rules that apply to naming simple variables apply to 
naming arrays. Remember that only numbers can be stored in numeric 
variable array names, and only character strings can be stored in string 
variable arrays. It is good programming practice not to use the same name 
for both a simple variable and an array in a program. 

The subscript (index) enclosed in parentheses can be any legal expres- 
sion; for example, A(K), J(2), and X(B + C) are valid references to array 
elements. 

When an array element is indicated by an expression, the computer 
carries out the following steps: 


1. It evaluates the expression inside the parentheses. 
2. It translates the result to the nearest integer. 
3. It accesses the indicated element in the array. 


For example, if the computer encounters A(K), it looks at the current value 
of K. This value indicates the position of the desired element in array A. 


Arrays 


The DIM Statement 


Assume that I = 2, N = 3, and K = 5. Then 


A(I) refers to A(2)—the second element in array A, or 15. 
A(N) refers to A(3)—the third element in array A, or 16. 
A(I + N) refers to A(5)—the fifth element in array A, or 32. 


A(K) refers to A(5)—the fifth element in array A, or 32. 


References to specific elements of arrays are called subscripted vari- — 
ables. In contrast, simple variables are unsubscripted variables. An unsub- — 
scripted variable—say, P3—is used to refer to a single storage location 
named P3; the subscripted variable P(3), in contrast, represents the third 
item in an array called P. 


When a programmer uses an array, the BASIC compiler does not automati- 
cally know how many elements the array will contain. Unless told other- 
wise, it makes provisions for a limited number. 


J Ss : Pansequsatty, it reserves 
space for ten plants! in the array. The programmer cannot write a state- 
ment that refers to an array element for which space has not been re- 
served. 

The programmer can specify the number of elements for which space 
must be reserved by means of a DIM (dimension) statement. A DIM state- 
ment is not required for arrays of ten or less elements (or whatever num- 
ber of elements the system assumes); however, many programmers will 
specify DIM statements for small arrays to help document the array usage. 

The general format of the DIM statement follows: 


line# DIM variable 1(limit 1),variable 2(limit 2),... 


The variables are the names of arrays. Each limit is an integer constant 
that represents the maximum number of storage locations required for a 
particular array. 

Assume that space is needed to store twenty-five elements in an array 
named X. The following statement reserves storage for twenty-five ele- 
ments: 


There is no problem if fewer than twenty-five values are actually read into 
array X, but it cannot contain more. Array subscripts can vary in the pro- 
gram from 0 to the limit declared in the DIM statement, but no subscript 
can exceed that limit. 
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More than one array can be declared in a DIM statement; for example, 


declares A, B, and J as arrays. Array A may contain up to 30 elements; B, 
up to 20 elements, and J, up to 100 elements. (If an index of 0 is used, up to 
31, 21, and 101 elements can be stored, respectively.) 

DIM statements must appear in a program before the first references to 
arrays they describe. A good programming practice is to place them at the 
beginning of the program. The following standard preparation symbol is 
often used to flowchart the DIM statement: 


One-Dimensional Arrays 


This section has been discussing lists of related values stored under a 
single variable name—one-dimensional arrays. Let us look at some appli- 
cations involving the use of one-dimensional arrays. 


Reading Data into an Array 


Using FOR and NEXT statements can be an efficient method of reading 
data into an array. The following program segment reads and stores a list 
| of ten numbers in an array named J: 


The first time through this program loop, the loop variable S equals 1. 
When statement 20 is executed, the computer reads a number from the 
data lists and stores it in J(1)—the first storage location in array J. The 
second time through the loop, S equals 2. The next number is read into 
J(2)—the second location in the array. The loop processing continues until 
all ten numbers have been read and stored. 


Printing Data in an Array 


Now assume we are to print the first eight numbers in array J in a single 
column. The following statements do just that: 
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As the loop variable N varies from 1 to 8, the index changes, and the q 
computer prints elements 1 through 8 of array J. E 


Computations with Arrays 


The program in Figure 9-2 generates a sales report that outlines the cur- q 


rent prices of several items, the quantities sold, and the sales revenues — 


that resulted. In addition, the program prints out the total amount of all 
sales. 
This problem solution can be broken into the following steps: 


1. Read the data into arrays. 


2. Calculate the sales revenue for each item by multiplying price and 
quantity. 
3. Calculate the total revenue by adding the sales revenues. 


Three arrays are used in Figure 9-2. Two one-dimensional arrays are 
read as input: a price list, stored in array P, contains a list of the prices of 
six items; a quantity list, stored in array Q, contains a list of the quantities 
sold of the items. In the main part of the program a third array, T, is 
generated. It is a list of the gross sales of the items. 

The program begins with a segment that establishes the price array, P. 
In lines 30 through 40, the variable J is set equal to 1, and a number is read 
from the data list and assigned to P(1). As the looping continues, P(2) is 
given a value, then P(3), and so on. When the looping is finished, array P 
contains the prices of the items. That is, P(1) is 0.75, P(2) is 2.98, and so on. 

The next segment of the program fills array Q with values in the same 
manner. The values read into Q are the quantities of the six items sold. 
Thus, after execution of the loop (lines 45 through 55) has been completed, 
Q(1) is 11, Q(2) is 95, and so on. 

Once the array elements have been stored, it is possible to manipulate 
them to obtain the desired information. For example, the main part of the 
program calculates the gross sales for each of the six items and stores the 
results in the array T. These computations are accomplished by multipli- 
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cation of the elements in the price array P by the corresponding elements 
in the quantity array Q. All these arrays are then printed. 

We also are to determine the total amount of all sales. We know that the 
array T contains the sales for each item. Therefore, we need to add all the 
elements in array T. This is accomplished in lines 80 through 95. 

If we wanted the total sales of only the first two items, we could simply 
alter the number of times the FOR/NEXT loop is executed: 


Figure 9-2 SALES TOTALS PROGRAM 


(Figure continued next page) 
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Figure 9-2 (continued) 


e@| PRICE QUANTITY SALES 


Two-Dimensional Arrays 


An array does not have to be a single list of data; it can be a table or matrix. 
For example, assume that Andy’s Hamburger Chain operates nine restau- 
rants—three in each of three different cities. Andy has received the fol- 
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lowing table of data concerning the number of hamburgers sold by each of 
the nine restaurants: 


Restaurant 
City Main _ Branch Drive-through 
Toledo 100 50 35 
Detroit 95 60 50 
Columbus 110 80 100 


The rows in the table refer to the cities, and the columns refer to the 
restaurants. Thus, the number of hamburgers sold in Andy’s main restau- 
rant in Columbus can be found in the third row, first column. 

This arrangement of data—a table consisting of rows and columns—is 
called a two-dimensional array. In this case, the two-dimensional array of 
data comprises three rows and three columns—a total of nine elements 
(3 X 3). 

Two-dimensional arrays are named in the same way as other variables. 
A name used for a two-dimensional array cannot be used for a one-dimen- 
sional array in the same program (and vice versa). An individual element 
in a table is indicated by a pair of subscripts in parentheses. The first 
subscript indicates the row; the second, the column. The row and column 
subscripts are separated by a comma. 

If we name the array H for Andy’s Hamburger Chain, the number of 
hamburgers sold at the individual restaurants can be indicated by H(r,c), 
where r stands for the row in which a value is found, and c stands for 
the column in which it is found: 


Array H 


H(1,1)100  H(1,2)50 H(1,3) 35 
H(2,1) 95  H(2,2)60 H(2,3) 50 
H(3,1)110 H(3,2)80 H(3,3) 100 


Thus, H(2,3) represents the number of hamburgers sold at the drive- 
through in Detroit, found in row 2, column 3. H(1,1) indicates the number 
of hamburgers sold at the Toledo main restaurant. 

Notice that it is necessary to store the cities’ names in a separate array, 
because we cannot mix character string values with numeric values in the 
same array: 


Array C$ 


C$(1) Toledo 
C$(2) Detroit 
C$(3) Columbus 


As with one-dimensional arrays, individual subscripts in two-dimen- 
sional arrays may be indicated with any legal expression: 
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X(3,5) 
X(L5) 
X(LJ) 
X(2,I + J) 


The 4 X 8 array X contains the following thirty-two elements: 


Array X 


10 15 20 25 30 35 40 45 
50 55 60 65 70 75 80 85 
90 95 100 #105 110 115 120° =§125 
130 =. 135 140 145 150 8 §=155 160 165 


Assume that I = 4 and J = 2. Then 


X(J,I) refers to X(2,4)—the element in the second row, fourth column 
of array X, which is 65. 


X(4,]) refers to X(4,4)—the element in the fourth row, fourth column 
of array X, which is 145. 


X(3,J + 4) refers to X(3,6)—the element in the third row, sixth col- 
umn of array X, which is 115. 


X(I,5) refers to X(4,5)—the element in the fourth row, fifth column 
of array X, which is 150. 


As with one-dimensional arrays, the space needed to store a two-dimen- 
sional array must be tele Son the array size exceeds a certain li é 


WS. i Th refore, for a array to 
enebad other the row laa or the paula limit, the programmer must 
specify its size in a DIM statement. For example, 


reserves space for array X, which has twenty rows and five columns. 


Reading and Printing Data in Two-Dimensional Arrays 


Reading data into and printing data from two-dimensional arrays can be 
accomplished with nested FOR/NEXT statements. Thus, in Figure 9-3, 
we read Andy’s hamburger sales data into a two-dimensional array called 
H. The reading of the table follows a row-by-row sequence from left to 
right across each column. The loops in lines 20 through 55 perform this 
reading process: 
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When the program is executed, each data value is represented by the 
variable H followed by a unique pair of subscripts telling its location by 
row, I, and column, J. As the data values are read, they fill the table row by 
row (that is, after row 1 has been filled, row 2 is filled, and then row 3). 
The outer FOR/NEXT loop controls the rows (using the variable I); the 
inner loop controls the columns (using the variable J). Thus, every time 
the outer loop is executed once, the inner loop is executed three times. 
While I is equal to 1, J is equal to 1, 2, and 3. The first three numbers from 
the data list are read into H(1,1), H(1,2), and H(1,3). Then I is incremented 
to 2. The inner loop again is executed three times, and the next three 
numbers from the data list are read into the second row, H(2,1), H(2,2), and 
H(2,3). I is finally incremented to 3, and the third row of the table is filled. 

To print the entire table, a PRINT statement in a nested loop can be 
used. This is illustrated in lines 80 through 115. Let us examine the PRINT 
statements in this segment: 


The comma in line 100 signals the computer to print the three values in 
predefined print zones on the same line. After the inner loop has been 
executed, the blank PRINT in line 110 sets the carriage return so that the 
next row is printed on the next line. 


Adding Rows of Items 


After data has been read and stored as an array, it is possible to manipulate 
the array elements. For example, Andy may want to find out how many 
hamburgers were sold in Detroit or how many hamburgers were sold at 
drive-throughs. 

Since the data for each city are contained in a row of the array, we need 
to total the elements in one row of the array (the second row) to find out 


Figure 9-3 HAMBURGER SALES PROGRAM 


Dimension : 
Print 


Headings 


Print 
Results 


Advance 
Printer to 
Next 

Line 
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Figure 9-3 = (continued) 


00010 REM *** ANDY'S HAMBURGER CHAIN SALES INFORMATION *** 


00015 DIM He 


00045 DATA 100,50,35 
DATA 95,60,50 
DATA 110,80,100 
DATA "TOLEDO","DETROIT","COLUMBUS" 
PRINT 
PRINT "CITY","MAIN","BRANCH","DRIVE-THROUGH" 
PRINT 


le 
BRANCH DRIVE-THROUGK 
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how many hamburgers were sold in Detroit. This can be done with the 
following statements: 


Notice that H(2,J) restricts the computations to the elements in row 2, 
while the column, J, varies from 1 to 3. 


Adding Columns of Items 


To find the number of hamburgers sold at drive-throughs, we want to total 
the elements in the third column of the array: 


In these statements, H(I,3) restricts the computations to the elements in the 
third column, while the row, I, varies from 1 to 3. 


Totaling a Two-Dimensional Array 


Now suppose we need to know how many Andy’s hamburgers were sold 
altogether. This means we must add all the elements in the array: 


A is the variable that will be used to accumulate the total. It is initial- 
ized outside the loop. To add all the elements in array H, we are going to 
use a nested loop. The outer loop will control the rows and the inner loop, 
the columns. Line 190 does the actual accumulation. The first time 
through the loop, both I and J equal 1; thus, H(1,1) is added to 0. J is then 
incremented, and H(1,2) is added to A to make 150. Then H(1,3), or 35, is 
added. At this point, I is incremented to 2 so that we can begin adding the 
second-row values and so on until all the elements in H have been totaled. 
Figure 9-4 shows the complete program for Andy’s Hamburger Chain and 
the resulting output. 
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Figure 9-4 = (continued) 
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Figure 9-4 
(continued) 


REM *** ANDY'S HAMBURGER CHAIN SALES 
00015 DIM H(3,3) 

00020 FOR | = 1 TO 3 

00025 FOR J = 1 TO 3 

00030 READ H(1,J) 

00035 NEXT J 

00040 NEXT |! 

00045 DATA 100,50,35 

00050 DATA 95,60,50 

00055 DATA 110,80,100 

00060 DATA "TOLEDO","DETROIT","COLUMBUS" 
00065 PRINT 

00070 PRINT "CITY","MAIN","BRANCH","DRIVE-THROUGH" 
00075 PRINT 

00080 FOR | = 1 TO 3 

00085 READ C$ 

00090 PRINT C$, 

00095 FOR J = 1 TO 3 

00100 PRINT H( I,J), 

00105 NEXT J 

00110 PRINT 

NEXT I 


INFORMATION *** 


PRIN 
PRINT T;"HAMBURGERS WERE SOLD 


IN DETROIT" 


00170 PRINT D;"HAMBURGERS WERE SOLD AT DRIVE THROUGHS" 


002 A;"HAMBURGERS WERE SOLD ALTOGETHER" 
00999 END 


RUNNH 


205 HAMBURGERS WERE SOLD IN DETROIT 
e HAMBURGERS MERE SOLD AT DRIVE eee le 
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LEARNING CHECK 


tell the computer the position of an element in an array. 


The subscript enclosed in parentheses can be any legal expression. TRUE 
FALSE (Circle the correct answer.) 


. The _______ statement reserves storage space for the elements in an array. 
. A(n) _______ is a list of related values stored under a single variable name. 


A(n) —_____ is a table with rows and columns of elements. 

Two-dimensional arrays may be read in or printed out using _______ FOR/ 
NEXT loops. 

The first subscript of a two-dimensional array refers to the ________ of the 
element, and the second subscript refers to the 


Advantages of Arrays 


Although it may not be obvious at this point, arrays are useful in many ~ 
applications. By using arrays, we can avoid having to make up names for © 
numerous items. Also, once data are stored in an array, the data items 
(elements) can be referred to over and over again without being reread. 
Arrays also are used extensively in file processing (discussed in Chapter 
10). 

Arrays also can be manipulated in a number of ways besides the basic 
computational examples previously given. For instance, some of the more 
common manipulation techniques include array merges and array searches. 


Array Merge 


Two arrays can be merged into one (see Figure 9-5). For example, if we 
had two arrays—A and B, each with five elements—and we wanted to 
merge them into an array C that contained the data A,, B,, A,, B,,..., A;, B, 
(arranged in that order), we could use any of the following codes: 
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Figure 9-5 MERGING TWO ARRAYS 


(Figure continued next page) 
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Figure 9-5 = (continued) 


e| 
|_ARRAY_A ARRAY B 
1 es 
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or 


or 


Figure 9-5 illustrates a merging of two arrays. 


Array Search 


An array search consists of searching an array until a desired value or 
values are found. For example, you may want to know the number of 
scores higher then 89 in a particular array, or you may be searching for a 
single value. 

In the first case, assume that the array A contains thirty-five grades, and 
you want to know the number of scores higher than 89. The following 
segment could be used to search the array A and obtain the results: 


The variable X is used to count the number of scores higher than 89. Line 
120 checks to see if the score is less than or equal to 89. If it is, the computer 
skips down to line 140 without incrementing the counter. If the score is 
greater than 89, line 130 is executed, and the counter is incremented. Later 
in the program, the value of X could be printed out, giving the total num- 
ber of grades greater than 89 in array A. 

In the latter case, suppose you wanted to find out information for the 
August 19 concert at the local concert hall. The computer might prompt 
you to enter the date of the concert in which you are interested. It then 
would search a list of concert dates until it matched the two dates. Finally, 
the computer would extract the corresponding values from the other ar- 
rays and display them on the CRT screen. Note that if more than one array 
holds corresponding (related) data, the data must be contained in the same 
relative position in each array. (See Figure 9-6.) 
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Figure 9-6 CONCERT INFORMATION EXAMPLE 


The two types of searches just discussed were sequential array searches. 
In this type of search, the first element of the array is examined, then the — 
second, then the third, and so on, one after another until the end of the — 
array is reached. This type of search is adequate until we start dealing — 
with larger arrays (one hundred or more elements). After that point, se-— 
quential searches may become noticeably slow. If, however, the elements — 
in the array can be arranged in an ascending or descending sequence, a 
more efficient technique for searching the array is the binary search. ; 

In a binary search, portions of the array that do not contain the value — 
being searched for are eliminated. (Remember, the data must be in ascend- 
ing or descending order.) For example, in our concert information exam- — 
ple, we could list the concert dates in an array in ascending order (the — 
numbers are coded to reflect the month and the date in the following — 
manner: MM/DD), such as in Figure 9-7. 

To conduct a binary search on array D, the following steps are taken. 
First, the data item to be found in the array is entered from the keyboard— — 
0819 in this case. The data item entered (0819) then is compared to the | 
middle item in the array (0822), which in this case is the sixth clement 


Figure 9-7 BINARY SEARCH 


0819] 0819 Match— 
Ruled 0820 Search 
: Terminated 
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The date we are searching for is less than the date at D(6). Therefore, since 
the list is in ascending order, the computer knows that the elements D(6) 
through D(11) need not be searched. With only one comparison, we have 
already eliminated half the array. 

The next step is to compare the desired data with the middle value of 
the remaining elements, D(1) through D(5), in array D. This would be D(3), 
or 0810. Our date is larger than 0810; therefore, D(1) through D(3) can be 
ruled out for further searching. This leaves us with D(4) and D(5) left to 
search. Since there is no single middle element between 4 and 5, the lower- 
numbered element is chosen for the comparison. When D(4) is matched to 
0819, it is found that they are equal, and the search is terminated. The 
logic to perform a binary search must calculate which element within the 
array is to be compared on each pass through the search. The search will 
continue until an equal element is found or until all possible elements 
have been compared and found to be not equal. Figure 9-8 gives the cod- 
ing and flowchart for the binary search segment. 

Using a binary search is much more efficient than a sequential search 
when dealing with very large arrays. For example, if we had an array with 
one thousand elements, the maximum number of comparisons a binary 
search would need to make to find an equal element is 10, as compared 
with possibly 999 comparisons in a sequential search if the element we 
were searching for was the last one in the array. 


Many applications require that data items be sorted, or ordered, in some 
way. For example, names must be alphabetized, Social Security numbers 
arranged from lowest to highest, basketball players ranked from high scorer 
to low scorer, and the like. 

Suppose that an array, BA, contains five prices that we would like or- 
dered from lowest to highest: 


Array BA (Unsorted) 


2.03 
4.95 
1.13 
3.89 
2.56 


It is a simple matter for us to mentally reorder this list as follows: 
Array BA (Sorted) 


1.13 
2.03 
2.56 
4.95 
3.89 
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Figure 9-8 BINARY SEARCH PROGRAM SEGMENT 


160 INT "ARTIST: ";A$(S) 
00165 PRINT "STARTING TIME: ";T$(S) 
00170 GOTO 180 
00175 PRINT "NO CONCERT SCHEDULED" 
00180 REM 


What if there were seven hundred prices instead of five? Then it would 
not be so easy for us to order the price list. However, the computer is 
perfectly suited for such tasks. One method of sorting with the computer is 
illustrated in Figure 9-9. 
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The Bubble Sort 


The bubble sort works by comparing two adjacent values in an array and 
then interchanging them according to the desired order—either ascending 
or descending order. 

The program in Figure 9-9 sorts fifteen student names into alphabetical 
order. To the computer, the letter A is less than the letter B, B is less than 
C, and so on. Lines 135 through 145 simply read the student names into an 
array called S$ and prints them. Lines 160 through 205 perform the bubble 
sort. Let us examine them carefully to see what happens. 

Line 165 refers to the variable F, short for flag. It is initialized to 0. Its 
value is checked later by the computer to determine if the entire array has 
been sorted. 

Notice the terminal value of the FOR/NEXT loop that sorts the array. 
The terminal value is one less than the number of items to be sorted. This 
is because two items at a time are compared. J varies from 1 to 14, which 
means that the computer eventually will compare item 14 with item 14 + 
1. If the terminal value were 15 (the number of names), the computer 
would try to compare item 15 with item 16, which does not exist in our 
array. 

The IF/THEN statement in line 175 tells the computer whether to inter- 
change two compared values. For example, when J = 1, the computer 
compares JANELLE with SUE. Since J comes before S in the alphabet, 
there is no need to switch these two items: 


JANELLE J = 1 
No Switch 

SUE J=2 FRED 

) Switch 
FRED SUE, J = 3 ABE 

ee Switch 
ABE SUE J = RON 
Switch 

RON SUEJ = 5 KAREN 


Be fea 


ELLEN 


Then J is incremented to 2, and SUE is compared with FRED. These two 
names must be interchanged. This is performed by lines 180 through 190. 
Note that we have created a holding area, H$, so that the switch can be 
made. We move SUE to the holding area, H$, and then move FRED to 
SUE’s previous position. Now SUE is placed in the position previously 
occupied by FRED. Whenever the computer interchanges two values, F is 
set to 1 in line 195. This loop continues until every item in the array has 
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Figure 9-9 SORTING PROGRAM 


Dimension 
Arrays 


Print 
Headings 


Initialize 
Flag 


been examined. After once through this entire loop, the array S$ looks like 
this: 


JANELLE 
FRED 
ABE 
RON 
KAREN 
LES 
JONNY 
LYNN 
RACHEL 
KEN 
BENJI 
SONJA 
KRIS 
ELLEN 
SUE 
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Figure 9-9 = (continued) 


Print 
Headings 


REM *** THIS PROGRAM SORTS THE STUDENTS *** 
REM *** IN MIS 200 INTO ALPHBETICAL ORDER *** 
DIM S$(15) 
PRINT "MIS 200 - UNSORTED" 
REM *** READ NAMES INTO ARRAY *** 
PRINT 
FOR ! = 1 -T0.15 
READ S$(1I) 
PRINT S$(1) 
NEXT | 
PRINT 
PRINT 
REM *** BUBBLE SORT *** 


PRINT "MIS 200 - SORTED" 
FOR | = 1 TO 15 
PRINT S$(1) 
NEXT I 
DATA "JANELLE","SUE","FRED","ABE","RON", "KAREN" 
DATA "LES","JONNY","LYNN","RACHEL", "KEN" 
DATA “BENJI","SONYA","KRISS","ELLEN" 
END 


(Figure continued next page) 
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e| 
MIS 200 - UNSORTED 
a 


©) FRED | 


fee ae ee 
KAREN 


@lies 
e 
@ | RACHEL | 


rr 


KRISS 
@! lien 


Although several switches have been made, the list is not sorted com- 
pletely. That is why we need line 205. As long as F equals 1, the computer 
knows that switches have been made, and the sorting process must continue. 
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When the computer loops through the entire array without setting F equal 
to 1— that is, when no switches are made—the computer finds F equal to 0 
and knows that the list is ordered. 

Numbers, of course, can be sorted by this same method. Two-dimen- 
sional arrays can be sorted with nested loops. 


The Shell Sort 


The bubble sort just discussed is very simple to understand and code. 
However, it is not very efficient, because the bubble sort can only ex- 
change adjacent elements of the list being sorted. If an element is far from 
its proper position in the list, many exchanges will be necessary to bring it 
to its proper position. The Shell sort, named after its inventor, Donald 
Shell, avoids this difficulty. Figure 9-10 illustrates how one version of the 
Shell sort works. 

After defining the list to be sorted, a gap is chosen that is equal to one- 
half the size of the list. In the example in Figure 9-10, the gap is equal to 4. 
The elements of the list to be sorted are separated by the chosen gap and 


Figure 9-10 THE SHELL SORT 


List being sorted 


Result of sorting the sublists 


48 42 75 35 63 55 


(b) GAP = 2 


List being sorted 


Result of sorting the sublists 
48 35 63 42 75 
(c) GAP =1 


List being sorted 
48 35 63 42 75 


Result of sorting the entire list 


35 42 48 55 63 


Arrays 


233 


Il8YS 
aiqqng 
asje4 
yoreas Aeue * 
efuew Aeue * 


siomsuy 


234 


grouped into sublists. Our example has four sublists, each consisting of 
two elements (see Figure 9-10a). The first and the fifth elements of the list 
make up one sublist to be sorted; the second and sixth elements, another 
sublist; the third and seventh elements, another sublist, and the fourth 
and eighth elements, the final sublist. 

The sublists are sorted independently of each other, and the results are 
shown in Figure 9-10a. Two points should be made at this time. First, 
because the sublists are short, the sorting proceeds rapidly; second, be- 
cause the gap between the elements in each sublist is large, out-of-place 
elements make considerable movement toward their final positions. 

Next, the gap is divided in half, and the previously described process is 
repeated with a gap of two. This will give us two sublists, one consisting of 
all the elements in odd-numbered positions and one consisting of all the 
elements in even-numbered positions of the list being sorted. Each sublist 
is sorted independently; the results of sorting are shown in Figure 9-10b. 

The final step involves dividing the gap in half again, giving us a gap of 
one. This leaves us with only one sublist, which gives us the final result 
shown in Figure 9-10c. 

At first glance, the Shell sort may appear less efficient than the bubble 
sort. In fact, the entire sequence of sorts called for by the Shell sort takes 
much less time than a single bubble sort applied to the same list. This is 
because the earlier sorts of the Shell sort proceed rapidly, since the sub- 
lists are short. As we proceed through the Shell sort, the gap becomes 
smaller and the sublists become longer; because of the preliminary sorting 
that already has been done, however, the sublists are easier to sort. 

There are a number of different versions of the Shell sort, each using a 
different method to sort the sublists. The version of the Shell sort presented 
here uses the bubble sort to sort the sublists. Figure 9-11 shows the BASIC 
coding for this version of the Shell sort. The variable G is the value of the 
gap used to form the sublists. A bubble sort is used, but we compare and 
exchange X(I) and X(I + G) instead of X(I) and X(I + 1). 

The Shell sort is presented here as a good compromise between speed 
and simplicity. There are other algorithims that sort faster; however, they 
are often complex to program. 


LEARNING CHECK 


. A(n) ________ is the combining of two arrays into one. 

. A(n) _______ consists of searching the elements of an array until a desired 
value or values are found. 

. A sequential search is faster than a binary search when searching arrays of one 
hundred or more elements. TRUE FALSE (Circle the correct answer.) 


. The ______ sort works by comparing two adjacent values in an array and 
then interchanging them according to the desired order. 

. The ______ sort compares elements separated by a chosen gap and 
grouped into sublists and interchanges them according to the desired order. 
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Figure 9-11 
(continued) 


UNSORTED NUMBERS 
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A Programming Problem 


The Problem 


The Norm Crosby Swamp Classic Golf Tournament needs to determine 
quickly the tournament winner after the final round of scores is in. Five 
golfers have a chance to win. Their names and scores for the first three 
rounds follow: 


Tom Watson 69 69 70 
Lee Trevino 65 70 72 
Fuzzy Zoeller 66.771 ..70 
Bruce Lietzke B78 7257) 268 
Jack Nicklaus Fi 366.6570 


Solution Design 


Since the early round scores are known, they can be introduced to the 
program along with the golfers’ names in READ and DATA statements. 
The final round scores should be entered by an INPUT statement. Next, 
the total scores must be calculated and then sorted from lowest to highest. 
A crucial point is that as the scores are rearranged in the sorting section, 
the corresponding golfer’s name must be carried with each score (although 
the name is not sorted). Finally, the results must be printed. 


The Program 


Figure 9-12 shows this problem’s solution. Line 105 sets aside room for the 
variables (although this DIM statement is not strictly necessary, since the 
arrays have fewer than ten elements per index). Lines 150 through 175, a 
nested FOR/NEXT loop, read the data. Lines 195 through 210 enter the 
final round scores. Line 230 through 250 accumulate the total scores in a 
nested FOR/NEXT loop. The scores are sorted from lowest to highest in 
lines 270 through 305. The variable H in line 285 is the temporary storage 
area for scores during sorting. The variable H$ in line 290 performs the 
same duty for the golfers’ names. Every time the computer switches a 
total, T(J), it also must switch the corresponding golfer’s name. The com- 
puter performs the switches in lines 295 through 310. Lines 345 through 
380 print the results. 
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Figure 9-12 SORTING GOLF SCORES PROGRAM AND FLOWCHART 
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Figure 9-12 (continued) 


Figure 9-12—Continued 


Figure 9-12 (continued) 
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Figure 9-12 
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Summary 


= Arrays are lists or tables of related values stored under a single variable 
name. 


= Access to individual elements in an array can be gained through the use 
of subscripts. 


The DIM statement sets up storage space for arrays. 
Array manipulation is carried out through the use of FOR/NEXT loops. 


Two-dimensional arrays also are called tables or matrices. 


Two subscript numbers identify individual items in a matrix. The first — 
number indicates the row; the second indicates the column. 


= The bubble sort and the Shell sort are two methods of ordering values 
contained in an array. 


Review Questions 


1. What is an array? 


2. We can make reference to individual elements in an array by 
referring to their position. This is done through the use of 


3. When an array element is indicated by an expression, what three 
steps are carried out by the computer? 


4. Variables that are references to specific elements in an array are 
called ______ variables, whereas simple variables are called 
variables. 


5. What is the purpose of the DIM statement? 

6. DIM statements must appear where in a program? 

7. Array subscripts can vary in value from 0 to 

8. Which of the following flowchart symbols often is used for the DIM 


statement? 
fay : 
ia eo) 


9. A list of related values stored under a single variable name is a (n) 


10. The ______ statements are an efficient method of reading data into 
and printing data out of a one-dimensional array. 
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Debugging Exercises 


a Mi 


12. 


13. 


14, 


15. 
16. 


17. 


18. 


19. 
20. 


Write a set of instructions that will find the sum of the four 
elements in array A. 


A table consisting of rows and columns is called a(n) 


What would the DIM statement for array B, with four rows and six 
columns, look like? For how many elements would this DIM 
statement reserve space? 


Reading data into and printing data from two-dimensional arrays can 
be accomplished using statements. 


Give two advantages of arrays. 


What is an array merge? Write a sequence of instructions to merge 
two arrays of seven elements each. 


When searching large arrays (one hundred or more elements), is a 
sequential or binary search faster? Why? 


When searching an array using a binary search, the elements must 
be arranged in 


Describe how a bubble sort works. 
Why is the bubble sort less efficient than the Shell sort? 


00010 
00020 
00030 


00010 
00015 
00020 
00025 


00050 
00060 
00070 
00080 


DIM A(10),B(5) 
LET B = A(1) + A(2) 
PRINT B 


DIM L(15) 

FOR | = 1 TO 16 
PRINT L(1) 

NEXT | 


DIM R(25) 

FOR J. = 1 (7.0525 
READ R(1) 

NEXT J 


ELEMENTS OF G ¥#* 


00090 
00095 
00100 
00105 
00110 
00115 


*** TOTAL 
DIM G(12) 
KET _T. ¢= 
FOR N = 

LETET 
NEXT N 


ARRAY 


TO 12 
T + GY) 


iO 


00100 
00110 
00120 
00130 
00140 
00150 


DIM X(3,2) 
FOR-1e=<1_T0 2 
FOR J = 1 TO 3 
READ X(1,J) 
NEXT J 
NEXT | 
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6. 00090 
00100 
00110 
00120 
00130 


7. 00200 
00205 
00210 
00215 
00220 
00225 
00230 


8. 00070 
00080 
00090 
00100 
00110 
00120 


9. 00100 
00110 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00999 


10. 00110 
00115 
00120 
00125 
00130 
00135 
00140 
00145 
00150 
00155 
00160 


DIM X(5,4) 


REM ***® ADD COLUMN 4 OF A TWO-DIMENSIONAL ARRAY *** 


FOR | = 1 TO 4 
READ Y(5,1) 
NEXT 


REM *** MERGE ARRAY A AND B *#* 
DIM A(10),B(10) 
LET X = 1 
FOR | = 1 TO 10 
LET C(I) = A(X) 


LET C(I + 1) = BCX) 
NEXT | 
REM *** TOTAL NUMBER OF MALES IN CLASS *** 


DIM C(30) 
FOR | = 1 TO 30 
IF CC!) = "M" THEN 120 
Ete T=) 
NEXT | 


DIM T$(100) 
REM *** BINARY SEARCH FOR TELEPHONE NUMBER *** 
LET N$ = "352-3270" 
LET U 100 
LET. 0 
LET M INT((U + L) / 2) 
IF M = L THEN 220 
IF N$ = T$(M) THEN 220 
LET L = M 
GOTO 150 
LET U = M 
GOTO 150 
IF M = L THEN 250 
PRINT “FOUND" 
GOTO 999 
PRINT "NOT FOUND" 
END 


DIM G(27) 


REM *** BUBLE SORT GRADES IN DESCENDING ORDER *** 


LET F = 0 
FOR | = 1 TO 26 


IF GCI) < GCI + 1) THEN 155 
LET H = GCI + 1) 
LET GCI + 1) = GCI) 
LET GCI) = H 
LET F = 1 
NEXT | 
IF F = 0 THEN 120 
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Additional Programming Problems 


1. A furniture store is having a year-end clearance sale. It needs a 
program that will contain all its prices in one array and the 
corresponding rate of discount in a second array. A third array should 
be built to hold the sale price of each item (sale price = price — rate 
X price). Use the following data: 


Print out the original prices and their corresponding sale price. 


Price Rate of Discount 
$178.89 0.25 
59.95 0.20 
402.25 0.30 
295.00 0.25 
589.98 0.30 
42.99 0.20 


2. Write a program to fill in a two-dimensional array that is a 6 by 4 
multiplication table, and print it out as follows: 


X 1 2 3 4 
1 1 2 3 4 
2 2 4 6 8 
3 3 6 9 12 
4 4 8 12 16 
5 5 10 15 20 
6 6 12 18 24 


3. Bowling Green State University set up two sections of advanced 
Latin, both scheduled to meet at 8:00 a.m. Many of the students found 
this class too early to attend, so they dropped out. There are now ten 
students left in each class, so the university has decided to combine 
the two classes. Now it needs a program to merge the two lists of 
remaining students. Use the following data: 


Class A Class B 
Wahl Yoon 
Pattera Smoyer 
Pontello Rittenhouse 
Main Christoph 
Panham Navarre 
Beerman Mayers 
Yodzis O’Conner 
York Thomas 
Saylor Kaase 
Kim Savage 


Print out the merged list. 


Arrays 


4. Junior Johnson likes to play on computers, and now he wants a 
program that will keep track of all his baseball cards. He is tired of 
looking through all his cards whenever he wants to know something 
about a certain player. He would like to be able to enter the player’s 
name and have the computer print out the team the person is on, the 
number of games he has played, the number of at bats, the number of 
RBls, and the player’s batting average. 

The output should look like this: 


NAME: Last name, first Initial 
CLUB: Club name 

GAMES: XX 

AT BATS: XXX 

RBI'S: XX 

AVERAGE: 0.XXX 


Use this data: 


Player Club Games At Bats RBIs Average 
Ramos Expos 26 41 3 0.195 
Hisle Brewers 27 87 11 0.230 
Driessen Reds 82 233 33 0.236 
Bonnel Blue Jays 66 227 28 0.220 
Murcer Yankees 50 117 24 0.260 
Ayala Orioles 44 86 13 0.279 


The players, clubs, games, at bats, RBIs, and averages all should be 
in separate arrays. The data items for each player should be in the 
same position in their arrays as the position of the corresponding 
player. Test the program by entering any of the player’s names and 
checking the output with the data list. 


5. The Casket Company needs a program to list its employees’ names 
and I.D. numbers in ascending order by I.D. number. Use a bubble 
sort to sort the following data. (Remember that when you change the 
position of an I.D. in the array, the position of the name also must be 
changed so that they correspond.) 


1.D. Number Name 


467217 Alston, M. 
624719 Cioffari, R. 
784609 Chilson, D. 
290013 Sergent, D. 
502977 Layman, F. 
207827 Kock, D. 
389662 Wymer, E. 
443279 Toalston, A. 
302621 Kehmer, C. 
196325 McKee, K. 
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6. Write a program to provide the weather reporter with a list of major 
cities and their high temperatures for the day. The program should 
arrange the cities in alphabetical order using a Shell sort. The 
weather reporter then should be able to request a city and have its 
high temperature printed out. Use a binary search to find the 
requested city. Here are the data: 


City Temperature 
Miami 92 
New York 80 
Chicago 86 
Denver 78 
Los Angeles 83 
Houston 95 
Boston 73 
Fresno 85 


Arrays 
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Objectives 


After reading this chapter the student should be able to do the following: 
m Understand and discuss the structure of a file. 
m Understand and use sequential files. 


m Understand and use random relative files. 


Business applications often involve large amounts of data. It is not 
uncommon for programs dealing with inventory, payroll, or customer 
balances to process hundreds, thousands, or millions of data items. Since 
the main memory of the computer is limited, users need some means of 
storing programs and data so that they do not have to retype them into 
the computer every time it is necessary to run the programs. Some 
microcomputers are so small that they cannot store internally all the 
data needed. In addition, it is useful to establish a single data file that 
several programs can use in different ways at different times. For 
example, personnel data can be used in applications such as handling 
payroll, processing medical claims, and printing mailing lists. For all 
these reasons, data often is stored on external storage media (secondary 
storage devices)—usually magnetic disks and tapes. Groups of data 
stored on disks or tapes are known as files. 


J 
Fortunately, the principles on which the commands are based are 


similar. We look first at the fundamentals of file processing and later 
differentiate among implementations on the computers we have been 
discussing. 


What Is a File? 


A file is a way of organizing data. Think of a typical office, which probably 
has a number of file drawers. Usually each file drawer contains related 
information about one general topic. For example, one drawer might con- 
tain all the information about the firm’s clients and be called the client 
file. Within this drawer might be a separate information sheet for each 
client giving the name, address, and so on. Each of these information 
sheets are referred to as a record. The individual data items, such as the 
client’s name recorded on the information sheet, are called fields. A group 
of one or more related fields is known as a record, and a group of one or 
more related records is known as a file (see figure 10-1). 

The computer has allowed us to store and manipulate files much more 
efficiently than its predecessor, the file cabinet. The computer uses two 
main types of file access methods: sequential and random access. 


Sequential Data Files 


Magnetic tape is one type of sequential media (see Figure 10-2). In a se- 
quential file, the data items are recorded one after another and must also 
be read one after another in the same order in which the recording took 
place. For example, to recall the fifth item stored in a sequential file, you 
must start at the beginning of the file and read the first four items success- 
fully to get to the fifth one. 


Figure 10-1 FILE ORGANIZATION 
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Figure 10-2 MAGNETIC TAPE 


Data also can be stored sequentially on disk (see Figure 10-3). A disk is 
divided into concentric circles called tracks. The data items are recorded 
one after another on the tracks of the disk. Figure 10-3 shows how a disk 
containing our client file might be organized. The number 13 is the ASCII 
code for the carriage return, which is used to separate fields. 

In a sequential file, each field takes only the amount of space required 
by its length. To record data in a sequential file, the following three steps 
are needed: 


1. Opening a sequential data file for writing to the file. When opening a 
file, ihe programmer must tell the computer the name of the file to 
which it is to output the data. Using this name, the computer sets up 
a location on a disk or tape in which the data are to be placed. 


Figure 10-3 DISK 
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2. Writing data to a sequential data file. After opening a data file, data 
may be written onto the disk. A special statement is used to write 
data onto a disk, with the processing being similar to printing output 
on the screen or printer, except the data are being written onto the 
disk instead. 


3. Closing a sequential data file. The last step in creating a sequential 
data file is to close it. After all the data have been written on the 
disk, the file must be closed to prevent loss of its contents. Closing 
also indicates to the computer that the use of the file is finished for 
the present time. 


Reading from a sequential file also requires three steps: 


1. Opening a sequential data file for reading from the file. The opening 
of a sequential file for reading may be either identical to the opening 
format for writing to a file or slightly modified. For example, to open 
a data file to write to a disk may require that a word or character be 
included to indicate this, such as WRITE or W. To read from the data 
file, these might need to be changed to READ or R. 

2. Reading data from a sequential data file. After the file has been 
opened, the data can be read from the disk and placed in variables— 
numeric data in numeric variables and string data in string variables. 
Remember that in a sequential file, data are always read in the same 
order in which they were written. 

3. Closing a sequential data file. Closing the file after reading the disk is 
identical to closing it after writing to the disk. 


No matter what type of computer you are using, these general steps 
apply in using sequential data files. An example follows of sequential data 
file use on the DECSYSTEM 20 (also referred to as terminal format files). 
Following this, we will show the same example for each of our computers, 
the Apple, IBM/Microsoft TRS-80, and the PET/Commodore 64. Refer to 
the appropriate section for your computer. The discussion on implement- 
ing files will be limited to files on disk. Consult your manual for any 
differences in commands for tape. 


Decsystem 20 


Creating or Accessing a Sequential Data (Terminal Format) File 


The general format of the command that creates or accesses a data file for 
the DECSYSTEM 20 is as follows: 


line# OPEN “filename” AS FILE #number 


If a file already exists with the filename specified, th. computer will give 
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us access to it. Otherwise, a new file will be created. The number can be : 


used to refer to the file. The following is an example: 


Writing Data to a File 


After the file has been created, we can write data to it: 


line# PRINT #number,expression 


The number is the one used in the OPEN statement. The expression is the q 


data to be written onto the disk. For example, 


Pressing RETURN at the end of the line tells the computer that this is the : 


end of the data item. 


Closing a File 


The general format of the CLOSE command is as follows: 


line# CLOSE #number 


The program in Figure 10-4 creates a file called ALBUMS as file #2 and jl 


writes some data to it. 


Line 10 creates a file called ALBUMS. The file number at the end of the 7 
line is used later to refer to the file. Line 15 sets up a FOR/NEXT loop to © 
read some data items (in line 40) and write them to the file. Line 25 prints a 


the values in A$ to file #2, ALBUMS. Line 35 closes the file. 


Reading Data from a File 


To use the data stored on a file, we read it. The general forest of the 
INPUT command is as follows: 


Figure 10-4 CREATING AND WRITING DATA TO A FILE. 
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Figure 10-5 READING DATA FROM A FILE. 


line# INPUT #file number,variable list 


The following is an example: 


The program in Figure 10-5 reads data stored in the file called 
ALBUMS. 

Line 10 gives access to ALBUMS as file #2. Line 15 sets up a FOR/NEXT 
loop that reads the items from the file one by one into an array, A$, and 
prints them out for us to see. Line 25 prints the data on the screen. Line 35 
closes the file. 


Apple 


Creating or Accessing a Sequential Data File 


The Apple system calls data files text files. To tell the system to use the 
disk, we need to cue the computer by pressing the control (CTRL) key and 
the D key simultaneously. Since this has to be done several times in a file 
manipulation program, we may want to initialize a variable, D$, to CTRL- 
D by doing the following: 


Check Chapter 8 to refresh your memory about what CHR$ does. 
The general format of the command for creating or opening a text file is 
the following: 


line# PRINT D$; “OPEN filename’”’ 


D$ is the CTRL-D command. The file name must begin with a letter and be 
less than thirty characters long. An example follows: 
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A file called ALBUMS now is listed in our catalog. A catalog is a program 
that supplies a complete alphabetical list of a users files. It is designated as 
a text (data) file by the letter T in the catalog listing. The OPEN command 
is used in this manner whenever we want to gain access to data in a file. 


Writing Data to a File 


After the file has been created, we can alert the computer that we want to q 
put some data into the file by using this command: 


line# PRINT D$; “WRITE filename” 


This line is followed by the command that actually does the writing to the 7 
disk: q 


line# PRINT expression 


This PRINT command writes the expression to the disk. Since a sequential 
file is simply a long list of data, the computer needs to know where one ~ 
data item ends and the next one begins. Pressing the RETURN button at ~ 
the end of the PRINT line tells the computer this. : 


Closing a File 


The general format of the CLOSE command is as follows: 
line# PRINT D$; “CLOSE filename” 


The program in Figure 10-6 opens a file named ALBUMS, writes some 
data out to it, and finally closes it. 

Line 10 initializes D$ to the disk command. Line 15 creates the file. Line — 
20 tells the computer that we are going to write some data to the disk. 4 

In this example, the data items are different lengths: THE JAM—SET- — 
TING SONS is twenty-one characters long, TOM WAITS—SMALL | 
CHANGE is twenty-three characters long, and so forth. The items are sep 


Figure 10-6 CREATING AND WRITING DATA TO A FILE 
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arated from one another by the fact that they are on different lines. There- 
fore, the file is a list of items, each of which ends with the ASCII character 
13, the carriage return: 


ALBUM: THE JAM—SETTING SONS13TOM WAITS—SMALL 
CHANGE13DIRE STRAITS... 


Reading Data from a File 


Once a file has been established, it can be read whenever the user wants 
to use the data. The following command alerts the computer that reading 
from a file on disk is to occur: 


line# PRINT D$; “READ filename” 


To read the data items, we use an INPUT statement, as shown in Figure 
10-7. After the file is opened, line 70 signals the computer that we are 
going to read data from it. The FOR/NEXT loop then reads the data into 
an array, W$. The file is closed by line 90. 


IBM/Microsoft 


Creating or Accessing a Sequential Data File 


The general format for creating or accessing a sequential data file for the 
IBM/Microsoft microcomputer follows: 


line# OPEN “filename” FOR OUTPUT AS #number 
line# OPEN “‘filename’’ FOR INPUT AS #number 


The filename in quotes must be less than or equal to eight characters. 
OUTPUT specifies sequential output mode; it allows data to be written to 
the specified file on disk. INPUT specifies sequential input mode; it allows 


Figure 10-7 READING DATA FROM A FILE 
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data to be read from the specified file on disk. The number after the pound 
(#) sign will be used later as a shorthand reference to the file in the pro- 
gram. An example statement creating a file called ALBUMS follows: 


Writing Data to a File 


Once a file has been created, we can write some data to it by using a 
variation of the PRINT statement. Notice, however, that the following 
PRINT statement looks different from that used to display the results of 
processing: 


line# PRINT#number,expression 


The #number distinguishes this statement from a regular PRINT com- 
mand. The number should be the same one that was specified in the 
OPEN statement. The expression can be any valid variable, string, nu- 
meric constant, and so on. Since a sequential file is simply a long list of 
items, the computer knows where one data item ends and the next one 
begins by the pressing of the carriage return at the end of the PRINT line. 


Closing a File 
The general format of the CLOSE command follows: 


line# CLOSE #number 


Again, the number should be the same one that was used to open the file. 

The program in Figure 10-8 opens a file named ALBUMS, writes some 
data to it, and closes the file. 

Line 10 creates the file as #1. That same number is used throughout the 
program in the file statements as a shorthand reference to ALBUMS. Lines 
15 through 30 simply write four data items to the file. Line 35 closes the 
file. 


Figure 10-8 CREATING AND WRITING DATA TO A FILE 
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Figure 10-9 READING DATA FROM A FILE 


Reading Data from a File 


Once a file has been created, it can be read to access the data using the 
following: 


line# INPUT #number, expression 


The #number distinguishes this as a file statement. The following is an 
example: 


The program in Figure 10-9 reads data stored in a file called ALBUMS: 

Line 10 accesses ALBUMS as file #2. Line 15 sets up a FOR/NEXT loop 
that reads the items from the file one by one into an array, B$. The items 
are displayed by line 25. Line 35 closes the file. 


TRS-80 


Creating or Accessing a Sequential Data File 
After you have turned the TRS-80 on, the computer will ask, 


HOW MANY FILES? 


Since we are going to deal with fewer than three files, we can simply press 
the ENTER button in response. 
The following command permits access to a file: 


line# OPEN “mode,” buffer number, “filename” 


The “mode” will be either I for sequential input (reading data from an 
existing file) or 0 for sequential output (writing data on the disk). After the 
“mode” is specified, we designate the number of the buffer where data 
temporarily will be held. The filename can be from one to eight characters 
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long; the first character must be alphabetic (do not embed any blanks). An 
example follows: 


This line creates a file called ALBUMS. After the file is opened, we can use 
buffer 1 to write data to the file (“mode” = 0). We will see how this works 
later. 


Writing Data to a File 


After a file has been created (opened), data can be written to it. The gen- 
eral format of the PRINT command follows: 


line# PRINT #buffer number, expression 


For example, 


prints the character string THE JAM—SETTING SONS as the first item in 
the file called ALBUMS. The #1 is the buffer number used in the OPEN 
statement for ALBUMS above. 

Now we can write a simple program that creates a file and writes some 
data to it, as shown in Figure 10-10. 

Line 10 opens the file called ALBUMS. We use buffer #1 to write data to 
the file. Pressing ENTER at the end of each line separates one item from 
another on the disk file. Line 35 closes the file. 


Closing a File 
The following command closes a file: 
line# CLOSE #buffer number 


Make sure that the buffer number is the one specified in the OPEN state- 
ment for the file. (See lines 10 and 35.) 


Figure 10-10 CREATING AND WRITING DATA TO A FILE 


Complete BASIC Programming 


Figure 10-11 READING DATA FROM A FILE 


Reading Data from a File 


To read data from a file, we first must gain access to it by using the OPEN 
statement. However, the mode is now I, for sequential input. The follow- 
ing statement should be used to gain access on an already existing file: 


line# OPEN“‘l’”, buffer number, ‘filename” 
The command that reads data from the file follows: 
line# INPUT #buffer number,variable 


The program segment in Figure 10-11 reads data that have been stored in 
ALBUMS. 

Line 10 gives access to an already existing file called ALBUMS. A FOR/ 
NEXT loop then is established to read the data into an array, B$. Data is 
read from the file by line 20. Note that the buffer number is the same as 
was designated in the OPEN statement. Lines 30 through 40 simply print 
out the file. Line 45 closes the file. 


PET /Commodore 64 


Creating or Accessing a Sequential Data File 


The general format of the command for creating or accessing a data file for 
the PET/Commodore 64 microcomputer follows: 


line# OPEN file#,device#,channel#,“0:name,type,direction” 


The file# is used to refer to the file. The device# is 8, which tells the 
computer to open the file on disk. The channel# is a data channel, num- 
bers 2 through 14. For convenience, it is suggested that you use the same 
number for both the channel# and file# to keep them straight. The name is 
the file name. For our purposes here, the type is SEQ (sequential), which 
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can be abbreviated by using just the first letter, S. The direction must be 
READ or WRITE, or at least the first letter of each. An example follows: 


If the file ALBUMS already exists and we need only read what is on it, the 
W should be changed to R. The following example gives us access to an 
existing file called ALBUMS: 


Writing Data to a File 


After a filename has been created, we can write data to the file by using a 
PRINT command. The general format follows: 


line# PRINT#file number, expression 


The file number is the one specified in the OPEN statement. The expres- 
sion is the data to be written onto the disk. For example, 


writes THE JAM-SETTING SONS to file #2. Pressing RETURN at the end 
of the line signals the computer that this is the end of the data item. 


Closing a File 
The general format of the CLOSE statement follows: 
line# CLOSE#file number 


Let us put these commands together in Figure 10-12 to create a file called 
ALBUMS, write some data to it, and close it. 


Reading Data from a File 


Once a file has been established, it can be read so that manipulations can 
be performed on the data. First, the file should be reopened: 


Figure 10-12 CREATING AND WRITING DATA TO A FILE 


Complete BASIC Programming 


Figure 10-13 READING DATA FROM A FILE 


line# OPEN file#, device#,channel#, “O:name, type, direction” 
Then we use the following command to read the data items: 
line# INPUT#file number, expression 


The file number, of course, must be the same as the file number in the 
OPEN statement. The expression is the variable that specifies where the 
| data will be stored in internal memory. 

The program in Figure 10-13 reads data from the file called ALBUMS: 
Line 10 opens file #2. Since the file already has been established, R is 
specified as the direction (that is, to read from the file). AFOR/NEXT loop 
is initiated in line 15. Line 20 reads data from file #2 into an array, A$. 
Line 25 is a PRINT statement. No file number is specified; it simply prints 
| the data items on the screen of the PET /Commodore 64. Finally, the file is 
closed in line 35. 


LEARNING CHECK 


1. A(n) is a group of one or more related records. 
2. and are two main types of file access methods. 


3. Records in sequential files are written to and read from the disk one after the 
other starting with the first record. TRUE FALSE (Circle the correct answer.) 


4. The three steps needed to read data from a file are 


qv a. open file for writing, read data from file, close file. 
4 dating b. open file for reading, read data from file, close file. 
ag snty \iebeagoiae oe 7 c. open file for reading, write data to file, close file. 
siomsuy 


Random Data Files 


Random data files are files that allow you to write to or read from a file in 
random order. Figure 10-14 illustrates how a random file is organized on 
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disk. For the purposes of this book, all records must be the same length in 
a random file. (Check your manual for other options.) This enables the 
computer to find them without reading all the preceding records. Since the 
fields that make up each record may not be the same length, blank charac- 
ters are placed after them. Because of this, random files tend to take up 
more disk space than sequential files, but this disadvantage is outweighed 
by the associated advantages, such as speed of access. 

Our discussions of random files for each computer will deal with rela- 
tive files. A record file with relative organization contains records that are 
stored in numbered locations. The number associated with a position rep- 
resents its location relative to the beginning of the file. For example, rec- 
ord 1 would occupy the first record position; record 2, the second record 
position; and so forth. Thus, with a relative file we can access a record 
either sequentially or randomly by record number. 

Like sequential files, random files have to be opened before use and 
closed after use. When reading or writing with a random file, the number 
of the record to be read or written to must be specified. Record numbers 
start with 1 and continue to as high as necessary to store all the records. 

The methods used to perform these steps vary from computer to computer. 

The following examples are programs that provide random access to 
relative files. These programs demonstrate how to create a file, write data 
to a file, read data from a file, and close a file. 


Figure 10-14 RANDOM DATA FILES 
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DECSYSTEM 20 


To access records in a file for the DECSYSTEM 20, you must establish a 
buffer for input and output. The MAP statement establishes and names the 
buffer and describes the characteristics of the records in a particular file. 
The MAP statement specifies that certain variables are contained in the 
buffer. Its general format follows: 


line# MAP (name) elements(s) 


where (name) is the name given to the buffer (parentheses are optional), 
and element(s) is a list of elements separated by commas that defines the 
characteristics of the record. Each element represents a field in the record. 
The length of a string variable must be specified by the syntax: 


string variable = n 


where string variable is any string variable, and n is the number of charac- 
ters in the string (n must be a constant). For example, 


Creating or Accessing a Random Relative File 


A random relative file can be created or accessed through the use of the 
OPEN statement. The syntax of the OPEN statement includes many 
keywords that describe attributes of the file. These keywords generally are 
followed by a name, numeric expression, or line number and are sepa- 
rated by commas. Many of these keywords do not concern us in a book of 
this level. As such, the following general format of the OPEN statement is 
abbreviated to include only the relevant keywords. Consult your manual 
for a more complete discussion. 


INPUT 
OUTPUT } AS FILE # expression, 


,MAP map name } 
,RECORD SIZE num exp 


Line# OPEN ‘“‘filename” FOR { 


{ SEQUENTIAL 


RELATIVE } chat { 


The “filename” is a string expression that identifies the files. The FOR 
OUTPUT clause creates a new file with the “filename” you specify. The 
FOR INPUT clause requires that the specified file already exist. The 
clause “AS FILE # expression” associates the file with a file number. This 
file number will be used as a shorthand reference to the file later in the 
program. The SEQUENTIAL and the RELATIVE clauses arrange records 
sequentially by order of input and by numbered position in the file, re- 
spectively. FIXED specifies that the records are of a fixed length. The 
clause “MAP map name” references a MAP statement. The map buffer 
you reference defines the buffer used to store the file’s data temporarily. 
The “MAP map name” clause also can be used to define the record size. If 
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no “MAP map name” clause is specified, the maximum length of records 
(in characters) in the file must be specified using the “RECORD SIZE num 
exp” clause. 

An example of an OPEN statement to create a file called ALBUMS and 
write data to the file follows: 


To access the file ALBUMS after it has been created and read data from it, 
the following statement is used: 


00015 OPEN "ALBUMS" FOR INPUT AS FILE #1,RELATIVE FIXED,MAP BUFFI ; 
ei 


Writing Data to a File 


The PUT statement writes a new record from the buffer to the file. The 
general format of the PUT statement as we will use it follows: 


PUT file exp,RECORD num exp 


For example, 


This statement writes the data in the buffer to record position 3 in file #1. 
If the “RECORD num exp” portion of the statement is left off, the data will 
be written to the next record in the sequence from where the pointer 
presently is. That is, if the last record written was record 5, the data will be 
written to record 6. 


Closing a File 
The general format of the CLOSE command follows: 


line# CLOSE #file number(s) 


For example, 


The program in Figure 10-15 creates a file called ALBUMS and writes 
some data to it. 

Line 10 creates the buffer. Line 15 creates the file called ALBUMS. The 
WHILE loop in line 20 checks to see if the user wants to write another 
record. The number of the record to be written to is input in line 25. Lines 
30 and 35 input the data into the buffer. Line 40 writes the data in the 
buffer into the file in the record position specified in the variable R. The 
file is closed in line 55. 
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Figure 10-15 CREATING AND WRITING DATA TO A FILE 


00020 WHILE X$ <> "N"™ 

00025 INPUT "WRITE WHAT RECORD #";R 
00030 INPUT "ARTIST NAME";A$ 

00035 INPUT "ALBUM TITLE";N$ 


00045 INPUT "WRITE ANOTHER RECORD?(Y OR N)";X$ 
00050 NEXT 


00999 END 


~ RUNNH 

WRITE WHAT RECORD # ? 1 
ARTIST NAME ? THE JAM 

ALBUM TITLE ? SETTING SONS 
WRITE ANOTHER RECORD?(Y OR N) 
WRITE WHAT RECORD # ? 3 
ARTIST NAME ? DIRE STRAITS 
ALBUM TITLE 2? MAKING MOVIES 
WRITE ANOTHER RECORD?(Y OR N) 
WRITE WHAT RECORD # ? 2 
ARTIST NAME ? TOM WAITS 

ALBUM TITLE ? SMALL CHANGE 
WRITE ANOTHER RECORD?(Y OR N) 
WRITE WHAT RECORD # 2? 4 
ARTIST NAME ? THE KINKS 
ALBUM TITLE ? LOW BUDGET 
WRITE. ANOTHER RECORD?2(Y OR N) 


Reading Data from a File 


The GET statement reads a record from the file into a buffer. The general 
format of the GET statement as we will use it follows: 


GET file exp,RECORD num exp 


For example, 


This statement reads the data in record 3 from File#1 into the buffer. As 
with the PUT statement, if the “,RECORD num exp” portion of the GET 
statement is left off, the data will be read from the next record in the 
sequence from where the pointer presently is. 
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Figure 10-16 READING DATA FROM A FILE 


RUNNH 
READ WHAT RECORD # ? 3 
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LOW BUDGET 


The program in Figure 10-16 reads data stored in a file called ALBUMS. 

Line 10 creates the buffer. The existing file ALBUMS is accessed by the 
OPEN statement in line 15. The WHILE statement in line 20 checks to see 
if the user wants to read another record. The record number the user 
wishes to read is entered in line 25. Line 30 reads the data from a given 
record into the file buffer. The PRINT statement in line 35 prints the con- 
tents of the buffer to the screen. Line 50 closes the file. 


Apple 


Creating or Accessing a Random Relative File 


The general format of the command for creating or opening a random 
relative file for the Apple microcomputer follows: 
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pee 


line# PRINT D$;“OPEN filename,L record length” 


See the earlier discussion on PRINT D$ for the Apple Microcomputer. The 
filename must begin with a letter and be less than thirty characters long. 
The record length is the total number of characters in each record. An 
example follows: 


Writing Data to a File. 


The general format of the command that tells the computer we want to 
write data into the file is as follows: 


line# PRINT D$;““WRITE filename,R”;record number 


For example, 


tells the computer that we want to write data into record position 3 of the 
file. This line is followed by the line that actually does the writing to the 
disk: 


line# PRINT expression 


For example, 


This command actually prints the data to record position 3 in the file. 


Closing a File 
The general format of the CLOSE command follows: 


line# PRINT D$;‘‘CLOSE filename” 


The program in Figure 10-17 opens a file named ALBUMS, writes data to 
the specified records, and finally closes it. 

Line 10 initializes D$ to the disk command. Line 15 creates the file 
ALBUMS, and each record contains thirty characters. Line 20 checks to see 
if the user wants to write another record. Line 25 allows the user to enter 
the record number to which he or she wishes to write. The data are input 
into a file buffer in lines 30 and 35. The computer prepares to write to the 
file in line 40, and lines 45 and 50 actually write the data to the file. Line 
55 tells the computer to stop writing to the disk. The file is closed in line 
70. 
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Figure 10-17 CREATING AND WRITING DATA TO A FILE 


25 INPUT "ENTER RECORD #";1 
30 INPUT "ARTIST NAME"; A$ 

35 INPUT "ALBUM TITLES ;N$_ 
40 PRINT ITE ALBUMS R51 


45 PRINT AS 

50 PRINT N$ 

55 PRINT D$ 

60 INPUT "WRITE ANOTHER RECORD? ( 
Y OR N)"5X$ 

65 GOTO 20 

70° )$;"CLOSE ALBUMS" 


JRUN 

ENTER RECORD # 2 

ARTIST NAME TOM WA 

ALBUM TITLE SMA E 

WRITE ANOTHER RECORD?(Y. “OR N)Y 
ENTER RECORD # 

ARTIST NAME 7 I NKS- 

ALBUM TITLE L¢ 3UD 

WRITE ANOTHER RECORD? (Y OR N)) 
ENTER RECORD # 

ARTIST NAME TH 

ALBUM TITLE SETTING 

WRITE ANOTHER RECORD?(Y. OR N)Y 
ENTER RECORD # 3 
ARTIST NAME DIRE STRAT S | 

ALBUM TITLE MAKING MOVIE 
gee MAM a RECORD? (¥ “OR pL 


Reading Data from a File 


To read data from a file, you must first alert the computer with the follow- 
ing command: 


line# PRINT D$;‘READ filename”; record number 


For example, 
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This command readies the computer to read data from record position 2 of 
the file. 
To actually read the data, the INPUT command is used as follows: 


line# INPUT expression(s) 
For example, 


The program in Figure 10-18 reads records from the file ALBUMS. Line 30, 
35, and 40 perform the READ functions. See the discussion of the previous 
program for a description of the other statements. Line 30 readies the com- 


Figure 10-18 READING DATA FROM A FILE 


10 LET D$ = CHR$(4) 


15 PRINT D$;"OPEN ALBUMS,L 30" 

20 IF X$ = "N" THEN 60 

25 INPUT "ENTER RECORD soa" 

40 PRINT A$,N$ 

45 PRINT D$ 

50 INPUT "READ ANOTHER RECORD?(Y 
OR N)";X$ 

55 GOTO 20 


60 PRINT D$;"CLOSE ALBUMS" 
999 END 
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puter to read data from a specific record position in the file. Line 35 trans- 
fers the contents of the record to a file buffer, and line 40 prints the record 
to the screen. . 


IBM/ Microsoft 


Creating or Acessing a Random Relative File 


The general format for creating or accessing a random relative file for the | 
IBM /Microsoft microcomputer follows: 


line# OPEN “filename” AS #number LEN = number 
For example, 
The filename in quotes must be less than or equal to eight characters. The — 
number after the pound sign (#) will be used later as a shorthand reference ~ 


to the file in the program. The LEN = 30 clause defines the length of a i 
record to be thirty characters long. 


Writing Data to a File 


When using random relative files, FIELD statements must be used to allo- 4 


cate space in the random buffer for the variables that will be written tothe _ 


random file. The general format of the FIELD statement follows: 


line# FIELD #filename, width AS string variable,width AS string 
variable, ... 


For example, 


The LSET or RSET commands are needed to move the data into the ran- 
dom buffer. LSET left-justifies the string in the field, and RSET right- 
justifies the string, with spaces used to pad the extra positions. For exam- 
ple, if the string HELLO is to be printed in a field with ten positions, the 
RSET command will fill the field like this: 


This is called right-justifying. If the LSET command were used, the field 
will be filled like this: 


This is called left-justifying. 
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Numeric values must be converted to strings when placed into the buffer. 
This is accomplished by the functions MKI$ to make an integer value into 
a string, MKS$ for a single precision value, and MKD$ for a double preci- 
sion value. For example, to convert the following single precision value to 
a string: 


use 


Numeric values must be converted back to numbers using the “convert” 
functions: CVI for integers, CVS for single precision values, and CVD for 
double precision values. For example, 


converts the string A back to a single precision value. 
In the following program, the line 


places the data in A$ into the file buffer and left-justifies it. 
The PUT statement is used to write data from the buffer to the disk. The 
general format of the PUT statement follows: 


line# PUT #filename,number 


where filename is the number under which the file was opened, and num- 
ber is the record number for the record to be written. For example, 


writes the data in the file buffer to record position 3 in the random file. 


Closing a File 
The general format of the CLOSE command follows: 


line# CLOSE #number 


For example, 


The number should be the same one used to open the file. 

The program in Figure 10-19 opens a random file named ALBUMS, 
writes some data to it, and closes the file. Line 10 opens the file ALBUMS 
and specifies a record length of thirty bytes. The field lengths are defined 
by the FIELD command in line 15. Line 20 checks to see if another record 
is to be entered. The record number to be written is entered in line 25. The 
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‘ORD NUMBER TO WR 1TE" sR 
ME OF ARTIST"; AS. 
yeu asin OF ALBUM"; NS 


N)"5X$ 


Bebe, 


© RUN 

RECORD NUMBER TO WRITE? 
NAME OF ARTIST? Th 
NAME OF ALBUM? SETTING 
ENTER ANOTHER RECORD(Y OR N)2 Y 
RECORD NUMBER TO WRITE? 
NAME OF ARTIST? T 
NAME OF ALBUM? S 
ENTER ANOTHER RECORD(Y OR N)? 
RECORD NUMBER TO WRITE? 
NAME OF ARTIST? 
NAME OF ALBUM? 
ENTER ANOTHER RECORD(Y OR N)? 
RECORD NUMBER TO WRITE? 
NAME OF ARTIST? 

— NAME OF ALBUM? LOW BI , 

wENTER BNOTHER RECORD(Y OR N)? N a 


data are entered in line 30 and 35 and are placed into the file buffer in 
lines 40 and 45. Line 50 writes the data in the buffer to the disk. The file is 
closed in line 65. 


Reading Data from a File 


The GET command is used to move a record from a file into the random 
buffer. The general format of the GET statement follows: 


Get #filename,number 
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where filename is the number under which the file was opened, and num- 
ber is the number of the record to be read in the range of 1 to 32767. For 
example, 


would place the contents of record 2 into the file buffer. 
The program in Figure 10-20 reads data stored in a file called ALBUMS. 
Line 10 opens the file. The field lengths are defined in line 15. The WHILE 


Figure 10-20 READING DATA FROM A FILE 


10 OPEN "ALBUMS" AS #1 LEN = 30 
15 FIELD #1,15 AS B$,15 AS BI$ 
20 WHILE X$ <> "N" 

25 INPUT "RECORD NUMBER TO READ";R 


35 PRINT:PRINT 
40 PRINT B$; 
45 PRINT Bi$ 
50 PRINT:PRINT 

55 INPUT "READ ANOTHER RECORD(Y OR N)";X$ 
60 WEND 

65 CLOSE #1 

999 END 


RECORD NUMBER TO READ? 3 
DIRE STRAITS MAKING MOVIES 


READ ANOTHER RECORD (Y OR N)? Y 
RECORD NUMBER TO READ? 1 


THE JAM SETTING SONS 


READ ANOTHER RECORD (Y OR N)? Y 
RECORD NUMBER TO READ? 2 


TOM WAITS SMALL CHANGE 
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statement in line 20 checks to see if another record is to be read. The 
record number to be read is entered in line 25. Line 30 places the record 
into the file buffer. Lines 40 and 45 print the contents of the file buffer to 
the screen. Line 65 closes the file. 


TRS-80 


Creating or Accessing a Random Relative File 


The format for creating or accessing a random relative file for the TRS-80 
microcomputer follows: 


line# OPEN “R”’ file number,“filename”,record length 


For example, 


opens the file ALBUMS with record lengths of thirty bytes. 


Writing Data to a File 


See the previous discussion of the IBM/Microsoft microcomputer. The 
procedure for writing data to a file is the same. 


Closing a File 


The procedure for closing a file for the TRS-80 is the same as for the IBM/ 
Microsoft microcomputer. See the previous discussion. 

The program in Figure 10-21 opens a file, writes some data to it, and 
closes the file. 


Reading Data from a File 


See the previous discussion of the IBM/Microsoft microcomputer; the pro- 
cedure for reading data from a file is the same. 

The program in Figure 10-22 opens the file ALBUMS, reads some rec- 
ords, and closes the file. 


PET/Commodore 64 


Relative files are not implemented on the PET/Commodore 64. 
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Figure 10-21 CREATING AND WRITING DATA TO A FILE 


20 WHILE X$ <> ee 
INPUT "RECORD h Pee TE" ae 


INPUT "NAME OF ALBUM 


55 INPUT "ENTER ANOTHER RECORD(Y OR N)";X$ 
60 WEND 


999 END 


RUN 
RECORD NUMBER To WRIT 
NAME OF ARTIST? 

“NAME OF ALBUM? SETTING SONS 
ENTER ANOTHER RECORD(Y OR ND? 
RECORD NUMBER TO WRITE? 2 
NAME OF ARTIST? TOM WAITS 
NAME OF ALBUM? SMALL CHANGE : 

ENTER ANOTHER RECORD(Y OR N)? Y 
RECORD NUMBER TO WRITE? 3 
NAME OF ARTIST? DIRE STRAITS 

-NAME OF ALBUM? MAKING MOVIES 
ENTER ANOTHER RECORD(Y OR N)? Y 


Random versus Sequential Files 


The following is a short summary of the differences between random and 
sequential files: 


w Records in sequential files are written to the disk one after the other, 
starting with record 1. 
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Figure 10-22 READING DATA FROM A FILE 


DIRE STRAITS MAKING MOVIES 


EAD ANOTHER RECORD (Y OR N)? Y 
RECORD NUMBER TO READ? 1 


THE JAM SETTING SONS 


READ ANOTHER RECORD (Y OR N)? Y 
RECORD NUMBER TO READ? 2 


TOM WAITS . “SMALL CHANGE 


m Records in sequential files are read from the disk one after the other, 
starting with record 1. 


Records in random files may be written in any order desired. 
Records in random files may be read in any order desired. 
Records in sequential files can be of varying lengths. 


m Records in random files must all be the same length. 
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Another method of randomly accessing data in a file is through the use 
of indexed files. Indexed files initiate random access by means of a key, or 
a field within a record that uniquely identifies the contents of a particular 
record. For a more detailed discussion of indexed files, see your systems 
manual. 


LEARNING CHECK 


files allow you to write to or read from a file in random order. 


. All records in a random file must be the same length. TRUE FALSE (Circle 
the correct answer.) 


. Records in a relative file may be accessed sequentially or randomly by 


an “py pHERE 6 5.10; 
te RNG e . Records in a random file may be written in any order desired. TRUE FALSE 
elep dea f (Circle the correct answer.) 


A Programming Problem 


The Problem 


Because of the smaller enrollment in karate class during the summer, the 
continuing education department of Whatsamatter U. has decided to 
merge the intermediate and advanced classes into one. The class instruc- 
tor wants a list of all students in alphabetical order. 


Solution Design 


The fifteen students in the intermediate class are described on a file called 
INT.FILE. The ten students in the advanced class are described on a file 
called ADV.FILE. The data in these files can be read into an array. Then 
the names can be alphabetized and written to a new file called SUMMER.- 
FILE. 


The Program 


Figure 10-23 gives the program listing. Line 105 sets dimensions for the 
array that will hold the twenty-five names. Line 110 creates the new file 
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GN3 66600 

‘€# 38019 0000 

4 LX3N $6200 

OWSN LNIYd 06200 

ON SN'S# INIYd — $8Z00° 

GZ OL | = ¥ YOS 08200 

INIYd SLZ00 

xx* LNO LNIYd 2? 3TI4 OL VLVG JLIYM xxx W3Y 02200 
u3T!s°YaWWASu LNIYd $9200 

OZZ N3HL t = L di 09200 

A 1X3N $6200 

besa ks 06200 

$H = (L + ADEN SvZ00 

CL + ASN = CA)SN 0”Z00 

CA)GN = $H G¢z00 

GZZ N3HL (1 + A)GN => (A)SN JI 0¢Z00 
v2 OL | = 4 YOS $2200 

0 = L 1371 02200 

xxx VWLVG LYOS xxx W3Y $1200 


4INIYd 00200 
| LX3N $6100 
C1Y$N INI Yd 06100 


G2 OL 9L = 


w371d°AGVu LNIYd 
xxx LNO LNIYd ® AVYYNY OLNI VLVG GV3SY xxx W3Y 
LNIud 
4 | LX3N 
CL)$N LNIUYd 


Sto OL-t ==) 3d0d 

LN1Ud 

w3Tld°LNtlu LN1Yd 

xxx 1NO LNIYd ® AVYYW OLNI WiVd GV5Y xxx WAY 


(SZ)$N WIG 
xxx ONISSSIONd JTI14 xxx WI 


(penujuoc) §z-O} eanBig 
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Summary 


Review Questions 


that will hold the combined student data. The next two lines open the two 
existing files. Lines 140 through 155 put data from INT.FILE into the first 
fifteen positions of the array N$. Line 150 simply prints them out for us to 
see. The next loop, in lines 180 through 195 does the same thing for ADV.- 
FILE. Note the initial and terminal values of the FOR statement in line 
180. This lets us put the data from ADV.FILE into positions 16 through 25 
of the N$ array. 

Now we have a combined student list, but it is not alphabetized. We 
close files 1 and 2 with lines 205 through 210. Lines 220 through 260 alpha- 
betize the student array. Since we probably will need these names in the 
future, they are stored on disk by line 285. Line 290 prints out the list for 
the instructor. 


= Data is organized in the following manner. A single data item is called a 
field. Related fields are organized into a record. A file is composed of a 
group of related records. 


m There are two main types of files: sequential and random access. 


m There is no standardized method for performing operations on files 
stored on secondary storage devices. 


. A file contains 
. What is a record? 

. Each individual data item in a record is called a 
. Name the two types of file access methods that are discussed. 


Ina , the data items are recorded one after another and also 
must be read one after another in the same order in which they 
were recorded. 


6. How much space does each field of a sequential file require? 
7. Give the three steps needed to record data in a sequential file. 
8. What must the programmer tell the computer when opening a file? 
9. Data may be written to the disk only after the file has been 
10. Closing a sequential file does what two things? 
11. List the three steps required for reading from a sequential file. 


12. Data may be read from a sequential data file in any order. TRUE 
FALSE (Circle the correct answer.) 


ao FP ON 
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13. Give the general format of the command used to write data to a 
sequential file on your computer. 

14. Random files allow you to write or read from a file in random order. 
TRUE FALSE (Circle the correct answer.) 


15. The records in a relative random file must be the same length. 
TRUE FALSE (Circle the correct answer.) 


16. To find a record, the computer must read all preceding records in a 
random access file. TRUE FALSE (Circle the correct answer.) 


17. Random files have to be before use and after use. 


18. A record with relative organization contains records that are stored 
in locations. 


19. Relative files may be accessed 
a. sequentially 
b. randomly by record number 
c. aandb 
d. none of the above 


20. What is a key, and what is it used for? 


Debugging Exercises 


Identify the programs or program segments that contain errors, and de- 
bug them. 


1. 00010 OPEN BOOKS AS FILE #1 


2. 00010 OPEN "DATA" AS FILE #3 
00015 FOR | = 1 TO 10 
00020 READ X 
00025 PRINT #3,X 
00030 NEXT | 
00035 CLOSE #3 


3. 00100 OPEN "PAYMENTS" AS FILE #1 
00110 FOR | = 1 TO 100 
00120 READ P$ 
00130 PRINT #2,P$ 
00140 NEXT | 
00150 CLOSE #2 


4. 00010 OPEN "SUPPLIES AS FILE #6 
00020 FOR | = 1 TO 100 
00030 INPUT #6,S$(1),N(1) 
00040 PRINT S$(1),N(1) 
00050 NEXT | 
00060 CLOSE 
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5. 00010 OPEN "ORDERS" AS #1 
00015 FOR | = 1 TO 100 
00020 READ Y 
00025 PRINT 1,Y 
00030 NEXT | 
00035 CLOSE #1 


6. 00035 OPEN "TICKETS" AS FILE 5 
00040 FOR | = 1 TO 10 
00045 INPUT "ENTER NAME AND # OF TICKETS REQUESTED"; X$ 
00050 PRINT 5,X5 
00055 NEXT | 
00060 CLOSE 5 


7. 00010 OPEN INVENTORY AS FILE #1 
00015 WHILE X$ <> "N" 
00020 INPUT "ENTER PART"PS$ 
00025 PRINT P$ 
00030 INPUT "WRITE ANOTHER RECORD (Y OR N)2";X$ 
00035 NEXT 
00040 CLOSE #1 
00099 END 


- Does the following program segment correctly set up a buffer area 
and open the file ADDRESS? Correct it, if necessary. 


10 MAP BUF#1 N$ = 20,A$ = 30 
20 OPEN "ADDRESS" FOR INPUT AS FILE #1, 
RELATIVE FIXED 


9. 10 MAP BUFF1 N$ = 20 
20 OPEN "FILMS" FOR OUTPUT AS FILE #1, 
RELATIVE F1IXED,MAPBUFF 1 
30 INPUT "NAME OF FILM";N$ 
40 PUT #2,RECORD 3 
50 CLOSE #2 


10. Does the following program correctly create a file called CLIENTS? 
Correct it, if necessary. 


10 MAP BUFF1 N$ = 20,A$ = 30 

20 OPEN "CLIENTS" FOR INPUT AS FILE #1, 
RELATIVE FIXED,MAP BUFF1 

30 WHILE D$ <> "N" 

40 INPUT "WRITE WHAT RECORD #";R 

50 INPUT "CLIENT NAME;N$ 

60 INPUT "CLIENT ADDRESS;A$ 

70 GET #1,RECORD R 

80 PRINT M$,A$ 

90 INPUT "WRITE ANOTHER RECORD (Y OR N)";D$ 

100 NEXT 

110 CLOSE #1 

999 END 
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Additional Programming Problems 


1. You are to write a program that stores in a sequential file the name 
and birthday of the following four individuals: 


Joe—August 12 Sally—March 1 
Bob—June 4 Nan—April 15 


2. Write a program that will access the file created in Problem 1 and 
print out its contents. 


3. You have been asked by your boss to inventory all the parts in the 
following list. The list is in alphabetical order. Unfortunately, 
everything is stored numerically. To save time (imagine the list has 
ten thousand parts in it), you are to write a program that will accept 


the data, rearrange it numerically, and then write it to a sequential 
data file. 


Part Number Part 


0142 Nut 
1662 Bolt 
2439 Screw 
2841 Washer 


4. Write a program that will print the following headings and access and 
print out the file created in Problem 3. The space under QUANTITY 
will be left blank and is to be filled in as inventory is physically 
taken. 


PART # PART QUANTITY 


5. Write a program that creates a random access relative file of the 
persons and data listed here. The program should allow you to write 
as many records as you want to any record position you want. 


Name City State | Telephone Number 
Denise Epke Los Angeles CA 846-3592 
Bob Szymanski _— Boston MA 524-6800 
Candy Streeter Eugene OR 345-9164 


6. Write a program that will access the file created in Problem 5 and 
will allow you to randomly access any record desired. 
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11 Matrix Commands 


Objectives After reading this chapter the student should be able to do the following: 
w Understand and use the MAT READ and MAT PRINT commands. 


m Understand and use the MAT command with math operations. 


A matrix can be either a list or a table of data; essentially, the term_ 
matrix is just another name for a one- or two-dimensional array. Sc 


Matrix Statements 


One key word in each matrix command is the word MAT. Table 11-1 
shows typical MAT commands (X, Y, and Z are all matrices). 


Matrix Input/Output 


To read data into a matrix, we can use the MAT READ statement. The 
general format of the MAT READ statement follows: 


line# MAT READ matrix name 


Assume there exists a matrix X: 


62 99 43 
75 28 17 


The following statements could be used to read this data into array X: 


The MAT READ command causes the computer to read the data in a row 
order according to how it was dimensioned. That is, all of the first row is 
read into the matrix, then all of the second row, and so on. Another point 
to remember is that all the positions in the array must be filled when MAT 
commands are used. Otherwise, an “‘out of data” error message will result. 

The MAT READ statement is equivalent to a READ within nested FOR/ 
NEXT statements, as shown here: 


Array Input with Array Input with Nested 
MAT Statement FOR and NEXT Statements 


Similarly, we can use a MAT INPUT statement to enter data from the 
terminal: 
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Table 11-1 MATRIX STATEMENTS 


Operation BASIC Statement Function Array Manipulation 
Dimension DIM X(2,2),¥(2,2),2(2,2) Establish matrix size X=2XK2Y=2X2,;Z2=2X2 
Input/output MAT READ X Read data values 
into matrix X from Ae. 
DATA statements —45 
MAT INPUT Y Enter data values Y 
into matrix Y from 56 
terminal 89 
MAT PRINT X, Print matrix X row 1 2 
by row —4 5 
Replacement MAT Z = X Assign matrix z= 1 eee 
values on right side —-4 6 
of equal sign to 
matrix on left side 
of equal sign 
Addition MATZ=X+Y Sum X and Y, and z x Y 
place result in Z 6 8 i hr 56 
= + 
414 ae 45 
Subtraction MATZ =X-Y Subtract z x Y 
corresponding —4 -4 12 5 6 
elements of Y from = = 
X and place result 12-4 —45 89 
inZ 
Multiplication MATZ =X*Y Store products of X z x Y 
and Y in Z 21 24 12 56 
20 21 Longe ate, 89 
Scalar multiplication MAT Z = (2) * X Multiply each z x 
element in X by 2 2 4 12 
and place in Z = 2 
—8 10 a Ao5 
Initialization MAT Z = ZER Initialize Z to zero Zz 
00 
00 
MAT Z = CON Place 1s into Z z 
ey 
ES 
Identity MAT Z = IDN Create the identity Zz 
matrix 10 
01 
Transposition MAT Z = TRN(X) Enter the z 
transposition of X lied 
into Z 23355 
Inversion MAT Z = INV(X) Enter the inverse of z 
X into Z 0.038 —0.15 
0.031 0.08 
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A MAT PRINT statement can be used to print out a matrix in row order. 
The MAT PRINT statement has the following general format: 


line # MAT PRINT matrix name 


Thus, the statement 


is equivalent to the following statements: 


The following example illustrates the use of the MAT INPUT statement 
to enter data into a 3 X 3 matrix and the use of the MAT PRINT statement 
to get output 


Figure 11-1 THE MAT INPUT STATEMENT 


00010 DIM B(3,3) 

00015 PRINT "ENTER MATRIX VALUES" 
00020 PRINT “SEPARATED BY COMMAS" 
00025 PRINT 


00035 PRINT 


RUNNH 
ENTER MATRIX VALUES 
SEPARATED BY COMMAS 


? 15253%455,657,8,9 
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‘Z LNldd LWW Ol “be 
LAdNI LWW *€ 


QV3y IVW ‘*Z 
XUJEW “fh 


siomsuy 


Notice that line 40 ends with a comma. If we omit the comma, the output 
looks like this: 


oon au. Wh — 


Although the output is formatted differently, the matrix values are still 
printed in row order. 


LEARNING CHECK 


1. The term ________ is another name for a one- or two-dimensional array. 

2. The _______ statement is used to read data into a matrix. 

3. To enter data into a matrix from a terminal, the _____ statement is used. 
4. The following statements are equivalent to what MAT statement? 


10 FOR I= 1102 
15 FORJ=1103 
20 PRINT Z(I.J), 
25 NEXT I 

30 PRINT 

35 NEXT J 


Matrix Math 


Matrices can be added, subtracted, multiplied, and made equivalent. 


Addition and Subtraction 


Two matrices must have the same dimensions if they are to be added or 
subtracted. For example, the arrays below have the same number of rows 
(three) and the same number of columns (two): 
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The corresponding elements of one matrix are added to (or subtracted 
from) another matrix. Notice that the same matrix can be referred to on 
both sides of the equal sign: 


B A Cc 
6 8 5 6 2 
10 DSi AZ, 8] + |3 4 
12.4 2 3.4 2 9: 0 
B B Cc 
5 6 6 8 ‘hg 
7 Bye TO Aye scale 
3.4 2 12.4 2 9° 0 


Matrix Multiplication 


For two matrices to be multiplied, the number of columns of the first 
matrix must equal the number of rows of the second matrix. The resulting 
matrix will have the same number of rows as the first matrix and the same 
number columns as the second one: 


B E D 
7 ta 6.6 tee Ss 
1 GEO PN Ie ae Wy (ate: (ret 
Ut iat 9:- 10 4 5 6 
3X 3 3X2 2X3 


The result is derived by addition of the products of the row elements of 
the first matrix times the column elements of the second matrix: 


B 

29 40 51 (5*1)+(6*4) (5*2)+(6*5) (5*3)+(6*6) 
39 54 69| = |(7*1)+(8*4) (7*2)+(8*5) (7*3)+ (8*6) 
49 68 87 (9*1)+(10*4) (9*2)+(10*5) (9*3) + (10*6) 


When using MAT commands, you can perform only one operation at a 
time. The following statement is invalid: 
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Scalar Multiplication 


A matrix can be multiplied by a scalar value (a constant, variable, or 
expression) enclosed in parentheses. For example, 


E E 
102.12 5 6 
14 16 = 2 * 7 8 
18 20 9 10 

Replacement 


Replacement takes place when whatever is on the right side of the equal 
sign is placed into the matrix on the left side of the equal sign. The matri- 
ces must have the same dimensions, of course. For example, 


A B 
10 20 50 60 10 20 50 60 
30 40 70 80 30 40 70 80 
Initialization 


It is often necessary to initialize variables to specific values. The same can 
be done with matrices. 


Initializing to 0. The following MAT statement stores Os in an array: 


oooo 
ooco 


Initializing to 1. We also can use a MAT command to initialize all the 
elements of an array to 1: 
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The Identity Matrix 


The following statements create an identity (IDN) matrix: 


The diagonal of an identity matrix contains 1s; all other elements are 0s: 


Q 


oroo 


0 
0 
0 
1 


ooo rf 
cooro 


When the IDN function is used, the number of rows in the matrix must be 
equal to the number of columns. 


Transportation 


When a matrix is transposed, the rows of the old matrix become the col- 
umns of the new matrix. For example, 


If J looks like this: 


N oo Re 
OnrN 


then the transposition of J looks like this: 
yess is 3 ener 
2 4 6 8 


You must be careful that the dimensions of the matrix that will contain 
the transposed matrix values are the reverse of the dimensions of the 


Matrix Commands 


297 


uonisodsues; * 

NGI = 0 LWW 02 
(2'2)0 WIG OL * 

asje4 

SULUNJOD 'SMOJ * 

asye4 

SUOISUBWIP aWWeS ay) ° 


TNOSTH 


suemsuy 


matrix to be transposed. For example, J is a 4 X 2 matrix. therefore, G 
(which is to contain the transposition of J) must be a 2 X 4 matrix. 


Inversion 


One of the most powerful matrix commands is the inverse function. It 
often is used to solve simultaneous linear equations. The inverse of A 
usually is written A‘. The usefulness of the inverse function comes from 
the fact that A multiplied by its inverse gives a result that is the identity 
matrix. (See “A Programming Problem” for an example of its use.) 


LEARNING CHECK 


. To add or subtract two matrices, they must have 

. The same matrix cannot be referred to on both sides of the equal sign. 
TRUE FALSE (Circle the correct answer.) 

. When multiplying two matrices, the resulting matrix will have the same number 
of ____as the first matrix and the same number of ________ as the second 
one. 


. 10 MAT B = X + Y*Zisa valid MAT statement, TRUE FALSE (Circle the 
correct answer.) 


. Give the statements needed to create an identity matrix for a matrix with two 
rows and two columns. 


A is the process whereby the rows of the old matrix become the col- 
umns of the new matrix. 


A Programming Problem 


The Problem 


We want to use MAT commands to solve two equations with two un- 
knowns. This type of problem is very common in statistics, the sciences, 
engineering, and the area of business administration called operations re- 
search. Our method easily can be expanded for use with higher numbers 
of equations and unknowns. 

In this example, we want to find the values X, and X, that simulta- 
neously satisfy the following two equations: 


1X, + 2X, = 5 
3X, + 4X, =6 


ll 
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Solution Design 


If we looked at this problem in terms of matrices, we can analyze the two 
equations as follows: 


Beg 
A = 

3.4 

X, 
xX = 

X, 

5 
B = 

6 


The resulting matrix math operations follow: 


‘om x, 


X, 6 


In matrix notation, the two equations can be written as follows: 
AX =B 


We can use the inverse of matrix A to solve this problem in the follow- 
ing steps: 


1. Multiply both sides by A“' (the inverse of A): 
A 'AX = A''B 
2. Notice that A~'A is just the identity matrix |1 0| 
lo 11 
IX = A’'B 
or 
X=A''B 


All we have to do to find the matrix X is to multiply matrix B by the 
inverse of matrix A. 


The Program 


Lines 105 and 110 of Figure 11-2 set the dimensions of the arrays (matri- 
ces) A, B, C, D, and X. Line 125 reads data into A. Line 145 prints A. Line 
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Figure 11-2 LINEAR EQUATIONS PROGRAM & FLOWCHART 


REM *** SOLVE LINEAR EQUATIONS *** 
DIM A(2,2),C(2,2),D(2,2) 

DIM X(2,1),B(2,1) 

DATA 1,2,354 

DATA 5,6 

MAT READ A 

PRINT 

PRINT 

PRINT "MATRIX A" 

MAT PRINT A; 

MAT READ B 

MAT C = INV(A) 

PRINT “INVERSE OF MATRIX A" 
MAT PRINT C, 

MAT D.=C#A 

PRINT "INVERSE OF A TIMES A -- SHOULD BE IDENTITY MATRIX" 
MAT PRINT D; 

MAT X = C * B 

PRINT "SOLUTION -- MATRIX X" 
MAT PRINT X 

END 
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Figure 11-2 (continued) 


MATRIX A 


x Fo Mige tiie: Soke Ea She PETS rit 


| inveRSe OF A TIMES A -- SHOULD BE IDENTITY MATRIX 


150 reads data into B. Line 155 makes C the inverse of A. C is printed by 
line 165. (To better illustrate how the inverse works, lines 170 through 180 
multiply A by its own inverse and print the result—the identity matrix.) 
Line 185 calculates the solution (two unknowns, X, and X,) by multiplying 
B by the inverse of A. The solution is printed in line 195. 

The output of the program displays matrix A, its inverse, and these two 
multiplied by each other (they do produce the identity matrix). The solu- 
tion shows that X, = —4 and X, = 4.5. You can check this by putting these 
two values in the original equations and seeing that the numbers all work. 


Summary 


= Some BASIC compilers provide MAT statements to simplify array oper- 
ations. 


m The MAT READ and MAT PRINT statements read data and print data 
in row-by-row order. 


= The MAT INPUT statement permits data to be entered into a matrix 
from the terminal. 


mw There are various MAT commands to concisely perform the math ma- 
nipulations of addition, subtraction, multiplication, scalar multiplica- 
tion, and replacement. 


@ The ZER function initializes a matrix to 0; the CON function initializes 
an array to 1. 


= An identity matrix can be created by the use of the IDN function. 
m= The TRN function transposes a matrix. 


= Matrix inversion is accomplished by the INV function. 


Review Questions 
1. What is a matrix? 
2. What is the keyword used in all matrix commands? 
3. How do MAT READ and MAT INPUT read in the data? 
4. What statement will reserve space for a 3 X 4 matrix called G? 
5. What statement will print the matrix G in matrix form? 


6. What restriction is placed on the addition and subtraction of 
matrices? 


7. How are matrices subtracted? ; 
8. What restriction is placed on the multiplication of matrices? 
9. If matrix A is 2 X 4 and B is 4 X 3, what are the dimensions of 
matrix C, which is A * B? 
10. Explain how one matrix is multiplied by another. 
11. What is a scalar value? 
12. How do you multiply a matrix by a scalar? 
13. What command initializes an array to 0? 
14. What does the statement MAT A = CON do? 
15. What is an identity matrix? 
16. What restriction is placed on the dimensions of an identity matrix? 
17. How do you create an identity matrix? 
18. What is the transposition of a matrix? 
19. What command is used to transpose a matrix? 
20. What is the inverse of a matrix? 
21. What command will invert the matrix X? 
22. Why is the inverse of a matrix useful? 
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Debugging Exercises 


Identify the following statements and program segments that contain er- 
rors, and debug them. 


1. 00010 MAT READ X 
00020 MAT PRINT X, 
00030 DATA 10,20,30,40,50,60 


2. 00010 DIM A(3,3) 
00015 MAT READ A 
00020 MAT PRINT A, 
00025 DATA 75159:653585:254 


3. 00010 DIM X(2,3),Y(2,3),2(2,3) 
00020 PRINT "INPUT MATRIX X" 
00030 MAT INPUT A 
00040 PRINT "INPUT MATRIX Y" 
00050 MAT INPUT B 
00060 LET Z=X+Y 
00070 MAT PRINT Z, 


4. 00010 DIM A(2,3),B(3,2),C(2,3) 
00020 MAT READ A 
00030 MAT READ B 
00040 MATC=A- 8B 
00050 MAT PRINT C, 
00060 DATA 152+35455,657,8,9,10,11512 


5. 00010 DIM X(3,4),Y(4,3),Z(4,4) 
00015 MAT INPUT X 
00020 MAT INPUT Y 
00025 MAT Z=X * Y 
00030 MAT PRINT Z, 


6. 00010 DIM A(4,3) 
00015 MAT READ A 
00020 MATA=5 * A 
00025 MAT PRINT A, 
00030 DATA 255572953911285124510,6512 


7. 00010 DIM X(1,3),Y(1,53) 
00020 MAT X = ZER 
00030 MAT Y = X 
00040 MAT PRINT X, 
00050 MAT PRINT Y; 


8. 00010 DIM A(3,5) 
00020 MAT A = ONE 
00030 MAT PRINT A, 


9. 00010 DIM X(2,3) 


00015 MAT X = IDN 
00020 MAT PRINT X, 
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10. 00010 DIM B(5,4) 
00015 MAT INPUT B 
00020 MAT B = TRN 
00025 MAT PRINT Bs 


Additional Programming Problems 


1. Write a program to explore the power of the matrix commands. Given 
the matrices A and B below, compute A + B, A — B, (2) * A, A * B, 
and B * A. Notice that A * B does not equal B « A. 


1 
1 
0 


2. The White Snowmobile Company sells three models of snowmobiles 
(regular, super, and deluxe) in two colors (red and blue). The 
snowmobile sales for January and February are recorded here. 
Compute the total and average sales for each type of snowmobile. 


JANUARY Regular Super Deluxe 


Red 3 5 iz 
Blue 1 4 1 


FEBRUARY Regular Super Deluxe 


Red 7 2 3 
Blue 4 1 6 


3. Mr. Brown teaches an evening class in computer science. He decided 
to curve the grades at the end of the semester by adding five points to 
each test. Write a program to compute the new grades for Mr. Brown. 
The grades are now as follows: 


Student Test 1 Test 2 Test 3 


Alice 70 65 73 
Joe 81 79 74 
Bob 93 95 89 
Sue 87 83 85 
Peg 54 63 70 


4. An insurance company has the following income and expenses over a 
three-month period. Write a program that calculates the company’s 
monthly profit. Also, determine the amount of cash to be reserved for 
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Christmas bonuses based on 10 percent of the monthly profit. (Hint: 
Use two 1 X 3 matrices.) 


October November December 


Income 22,247 25,475 34,628 
Expenses 17,753 19,091 23,152 


5. Given the following matrix A, write a program to print A and to 
compute and print its transposition and inverse (A"‘). Then multiply A 
by A~' and A“ by A, and print the results. Can you explain these 
results? 


1 2 3 
A= 28 8 7 
2 5 ays 


6. The demand for a product is given by the equation 100p — q = 300. 
The supply of that same product is given by the equaiton 100p + q = 
500. In these equations, p stands for the price of the product, and q 
stands for the number of units demanded or supplied. Write a 
program to find p and q so that all products produced will be sold. 
That is, solve the simultaneous linear equations for p and q. (Hint: 
See “A Programming Problem” at the end of this chapter.) 
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Hardware 


Signing On 


The DECSYSTEM 2060 is a large minicomputer that can have up to several 
million bytes of addressable internal storage for programs—as opposed to 
tens of thousands of bytes in the microcomputers discussed here. The exact 
form of BASIC employed with the DECSYSTEM 2060 is called BASIC 
PLUS 2 by the manufacturer. 

The detailed hardware description depends heavily on what CRT ter- 
minal is used with this computer. The one used here is the standard VT- 
100 terminal. 


The power switch (toggle variety) is on the lower left at the back of the 
terminal. If the terminal is linked directly to the computer, press the CON- 
TROL and C keys at the same time. If the terminal is linked to the computer 
by telephone, dial the correct number. When you hear a constant high- 
pitched tone, place the telephone receiver in the modem; most modems 
have a light that comes on when the connection is made properly. Then 
press CONTROL-C. 
A header will appear, followed by the symbol @: 


TOPS-20 MONITOR 4(3247) 
e 


This is the prompt for the TOPS-20 MONITOR. (A monitor is the house- 
keeping program that controls the computer.) You must type LOGIN and 
an account identifier followed by a password. The password should be 
privileged information known only to those who need access to the pro- 
grams in this particular account. For example, the programs for this man- 
ual were kept in an account called IACCT.SZYMANSKI; access to the ac- 
count was controlled by the password BASIC. The screen looked like this 
after log-in: 


@LOGIN I|ACCT.SZYMANSK | 


The password did not appear on the screen because the monitor knows 
that any characters following the blank after an account identifier are not 
to be made public. 

After the RETURN key is pressed, the computer responds with a header 
giving the date and time. Then the monitor prompt (@) is displayed. To 
use the BASIC language, just type BASIC. When the computer is prepared 
to accept BASIC commands, it responds READY. To write a program, type 
NEW; the computer asks for a name for the program: 


READY 
NEW 
New program name--BOB.1 


READY 
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If you hit RETURN without supplying a name, the computer will call the 
program NONAME. You can now proceed to type in your program. 


Saving and Loading Programs 


Signing Off 


Keyboard 


We assume this computer uses disks for auxiliary storage. To save a pro- 
gram named BOB.1, simply type SAVE BOB.1: 


READY 
SAVE BOB.1 


READY 


To load the program at a later time, type OLD after the computer responds 
READY. The computer will ask for the old program’s name. Type BOB.1: 


READY 
OLD 
Old file name--BOB.1 


READY 


After the computer again responds READY, you may run or list the pro- 
gram or perform editing operations on it. 


If you are in BASIC, type BYE when you are finished. If you are in the 
system mode, type LOGOUT. After the computer acknowledges your mes- 
sage, turn the terminal off. 


The DEC keyboard allows entry of all standard text control characters. 
The DEC keyboard also has some additional characters, such as ~ and /. 
By pressing the shift key, you can enter the upper symbol on those keys 
that have two symbols. To do this, hold down the shift key while hitting 
the key with the desired symbol. The shift key also can be used to produce 
uppercase letters when the CAPS LOCK key is in the up position. When 
the CAPS LOCK key is pressed down, all letters will be displayed in up- 
percase. To switch back to lowercase, press the CAPS LOCK key again. 

The CNTRL key also is used along with other keys. By itself, this key 
does nothing. See your user’s manual for the control characters created 
when CNTRL is pressed with particular keys. 
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Specialized Keys 


Special Features 


The following keys have special functions. BASIC will perform a specified 
function when these are used rather than accept them as keyboard data. 


Key 


RETURN 
ESC 


DELETE 
NO SCROLL 


TAB 


LINEFEED 
SET-UP 
BACKSPACE 
BREAK 

T 


J 


Function 


Carriage control; enters lines to the computer. 

Escape key; saves the trouble of typing long filenames by 
allowing you to type in only enough characters so that the 
computer cannot confuse the filename with any other one 
in your directory, then pressing the ESC key will display 
the rest of the filename for you; indicates an end to what 
you are doing; displays guide words as hints about what 
information a DEC command needs. 

Eliminates the last character typed. 

Stops the display at any time so that what is on the screen 
may be read before it goes off the top. Press it again to 
continue display. 

Moves cursor to the beginning of the next eight-column 
field. 

Moves the cursor to the next line. 

Sets margins. 

Moves the cursor back one space. 

Stops program execution. 


Moves the cursor in the indicated direction. 


Each key has a repeat feature; when the key is held down for about one 
second, a stream of that character will be printed until you release the key. 
The DEC keyboard also has a numeric keypad similar to that of a calcula- 
tor. The keys at the top of this numeric keypad (PF1, PF2, PF3, and PF4) 
can be programmed to perform specific functions. 
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Hardware 


The Apple II initially contains INTEGER BASIC. Since INTEGER BASIC 
lacks many important features of the ANSI standard, this discussion only 
refers to this computer once Applesoft floating-point BASIC has been 
loaded. The Apple II Plus computer automatically comes up in Applesoft. 


Starting the Computer 


The power switch is located on the left rear portion of the computer. Since 
an external monitor or CRT is required, you must remember to turn on 
power to this device also. If a disk drive is attached, it will whir and try to 
boot the disk-operating system (DOS), so be sure that a diskette is placed in 
the disk drive before the computer is turned on. (When the disk drive 
boots the DOS, it loads from a diskette the instructions that tell the com- 
puter how to manage the disk. This must be done before the computer can 
perform any disk-related tasks.) The computer “comes up” with floating- 
point BASIC, as indicated by the use of the ] character as a prompt. 


Saving and Loading Programs 


Programs are commonly accessed from either cassette tape or disk on this 
system. 


Cassette 


To recall a program from a cassette tape into main memory, you must first 
position the tape to the beginning of the program. This means that you 
must keep a record of where programs are located on the tape. Next, push 
the PLAY button and pull out the earphone plug on the recorder until you 
can hear the tape sounds. When you hear a constant high-pitched tone, 
stop the recorder and plug the earphone jack back in. Then type LOAD, 
push the PLAY button, and hit RETURN. The program has been loaded 
when you hear a beep and the cursor appears on the screen. (The cursor is 
usually a flashing character, such as an underline or.a block, that shows 
where the next typed character will appear on the screen.) 

To store a program, position the tape to a blank area, type SAVE, push 
the PLAY and RECORD buttons simultaneously, and then press RETURN. 
Again, you will hear a beep, and the cursor will return when the program 
has been written to the tape. 
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Keyboard 


Specialized Keys 


Disk 


The Apple has a convenient file-by-name catalog system for the DOS. To 
save an Applesoft program—for example, one named TEST 3—on disk, 
type the following: 


SAVE TEST3 
and press RETURN. To load the same program from disk, type this: 
LOAD TEST3 


and press RETURN. You then can run the program. Alternatively, you can 
type RUN TESTS without loading it; this causes the DOS to both load and 
run the program. 


The Apple II and Apple II Plus keyboards contain all the standard key- 
board characters with the exception of lowercase letters. The Apple II and 
Apple II Plus only have an uppercase mode, so no lowercase letters can be 
entered. The shift key can be used to enter the upper symbol on those keys 
that contain two symbols. For example, to enter a *, hold down the shift 
key and hit the * key. 

The CNTRL key does nothing by itself; when used along with other 
keys, however, it produces additional control characters. Check your ref- 
erence manual to find the uses of these combinations. 


When these keys are pressed, BASIC performs a specific function rather 
than accept them as keyboard data. The following keys have special func- 
tions: 


Key Function 

RESET Stops program execution. 

RETURN Enters the line. 

ESC Clears the screen; also is used with I(T), J(<—), K(—), and 
M(}) for cursor movement. 

REPT When held down with another key, causes that character 


to be repeated. 
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Some of the Applesoft BASIC features presented in this book are 
affected by the use of the 80-column text card. These features include using 
commas to tab in a PRINT statement, and the TAB command. 

Comma tabbing will not function properly for the second forty columns 
of an eighty-column display. One method to avoid this problem is to embed 
blank spaces within the quotes of the PRINT statement. 

The TAB command also does not function as described when in eighty- 
column mode. The statement: 


POKE 1403, <horizontal postition 0 to 79> 


can be used when in eighty-column mode. For example, to tab over to 
column 67 when in eight-column mode type: 


POKE 1403,67 


Do not use the POKE command when in the forty-column mode. 
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Keyboard 


Specialized Keys 


Special Features 


Hardware 
The IBM Personal Computer contains an enhanced version of Microsoft 


BASIC. We will discuss the hardware configuration using disk only. Con- 
sult your documentation for cassette commands. 


Starting the Computer 


Place the diskette into drive A, the left-hand drive. Then turn the computer 
on. The power switch is located on the right rear of the machine. Do not 
forget to turn on the television monitor, too. When the computer is turned 
on, it will try to load the disk-operating system (DOS). (If no diskette has 
been placed into the disk drive, the computer will “come up” in Cassette 
BASIC.) 

The IBM Personal Computer has three BASIC dialects: Cassette BASIC, 
Disk BASIC, and Advanced BASIC. For the purposes of this book, they are 
the same. 

Once the DOS has been booted, or loaded, the computer asks for the 
date and time. If you don’t want to enter the date and/or time, just hit the 
RETURN key after the prompt. The date and time prompts appear as fol- 
lows: 


Current date !s Tue 1-01-1980 
Enter new date: 

Current time Is 0:00:07.96 
Enter new time: 


After you have responded to the time prompt and pressed the carriage 
return, the computer responds with the following: 


The !BM Personal Computer DOS 
Verston 1.10 (C)Copyright IBM Corp 1981, 1982 


A> 
The A> is the system prompt. Simply type BASIC and press the carriage 
return to load the disk BASIC translator, or type in BASIC A to load the 
Advanced BASIC translator. The BASIC prompt is OK. Now you are ready 
to start programming. 


Saving and Loading Programs 


Disk 


The IBM has a convenient file-by-name catalog system for the DOS. To 
save a program (for example, one named TESTS), type the following: 
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SAVE "TESTS" 


The name of the program should be less than or equal to eight characters. 
Do not embed any spaces. To load the same program from disk, type this: 


LOAD "TESTS" 


The ending quote (”’) is optional. You can then list and run the program. 


Keyboard 


The IBM keyboard allows entry of all standard characters. However, some 
special symbols are included that are not found on a regular typewriter, 
such as A, [, and ]. The shift key on this keyboard is marked with the 
symbol . While holding down the shift key, you may enter the upper 
symbol on any key that has two symbols. The shift keys produce upper- 
case letters when used with the A through Z keys. The CAPS LOCK key 
will cause uppercase letters to be produced every time an A through Z key 
is hit. To switch back to lowercase, hit the CAPS LOCK key once again. In 
addition to the shift keys, the CNTRL and ALT keys may be used with 
many other keys to enter characters or perform specific functions (check 
your manual). 


Specialized Keys 


When pressing the following keys, BASIC will perform a specific function 
rather than accept them as keyboard data: 


Key Function 

= Carriage return key; usually has to be pressed to enter in- 
formation into the computer. 

<= Backspace key (located above the carriage return key); 
backspaces and erases characters. 

PRTSC Print screen key; when pressed along with the shift key, 
causes whatever is on the screen to be printed on the 
printer. 

HOME Moves the cursor to the upper left corner and clears the 
screen. 

T Moves cursor upward. 

1 Moves cursor downward. 

= (Located below the 4 on the numeric keypad) Moves the 
cursor to the left but does not erase. 

= Moves the cursor to the right. 

END Moves the cursor to the end of the logical line. 

INS Allows characters to be inserted into the statement at the 


current cursor position. 
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DEL Deletes characters at the current cursor position. 


ESC Causes the entire logical line to be erased from the screen; 
the line is not passed to BASIC for processing. 

me! (Tab) Moves the cursor to the next tab stop. (Tab stops 

Les occur every eight characters.) 


The IBM keyboard has a function key section (F1 through F10) on the left 
side of the keyboard and a numeric keypad similar to a calculator keypad 
on the right, in addition to the regular typewriter area. The function keys 
can be set to automatically type any sequence of characters. Some already 
have been assigned frequently used commands but can be changed. Press- 
ing the NUM LOCK key shifts the numeric keypad so that it can be used to 
get the numbers 0 through 9 and the decimal point. Pressing the NUM 
LOCK again returns the keypad to its cursor control mode. 
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APPENDIX D TRS-80 


Hardware 


Starting Model III 


This discussion refers to the TRS-80 Model III with the Model III BASIC 
language. An older computer, the Model I with level II BASIC, is very 
similar to the Model III. The comments about BASIC programs here gener- 
ally apply to either computer but do not deal with the level I BASIC lan- 


guage. 


The power is turned on by use of a rocker switch beneath the keyboard on 
the right side nearest the programmer. When the switch is turned on (con- 
sult your manual about the proper sequence if you use peripherals), the 
computer responds as follows: 


CASS? 


The computer is asking whether you want to use low speed (63 characters 

per second) or high speed (190 characters per second) for cassette tape 

communication. Respond by typing L and pressing the ENTER key, typing 

H and pressing the ENTER key, or simply pressing the ENTER key. The L 

and H indicated low speed and high speed, and the default is high speed. 
Next, the computer displays the following: 


MEMORY SIZE? 


Simply pressing the RETURN key is the standard response unless you 
want to save some space in memory for machine language programs. Next, 
the computer displays this: 


RADIO SHACK MODEL II! BASIC 
(C) 80 TANDY 

READY 

> 


You now can begin using BASIC commands. 


Saving and Loading Programs 
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Programs commonly are accessed from either cassette tape or disk on this 
system. 


Cassette 


The TRS-80 has a convenient file-by-name cataloging system. To save a 
program, do the following: 
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Keyboard 


1. Position the tape to a blank area. 
2. Type SAVE ‘‘program-name”’; for example, SAVE “PROGRAM1”. 
3. Press the RECORD and PLAY buttons on the cassette. 


To load a stored program, you need only type the following and hit the 
RETURN key: 


CLOAD "program-name" 


When the cassette PLAY button is pressed, the computer will search for 
the program. The names of the programs found during the search will be 
displayed on the screen. After the computer has found the desired pro- 
gram, it will load it into main memory. 


Disk 

To save a program (for example, PROGRAM1), just type the following: 
SAVE "PROGRAM1" 

and hit the ENTER button. To load the same program from disk, type this: 


LOAD "PROGRAMi" 


Specialized Keys 


This keyboard allows entry of all standard text and control characters. By 
pressing the shift key, you can enter the upper symbol on those keys that 
contain two symbols. For example, to enter a $, hold down the shift key 
and hit $. 

The TRS-80 has two modes of operation: CAPS and ULC (uppercase/ 
lowercase). When the computer is started, the keyboard is in the CAPS 
mode; the A through Z keys will always produce uppercase letters. To 
switch to the ULC mode, press the shift key and 0. In this mode, the A 
through Z keys produce lowercase letters unless you press the shift key. 
The shift key and 0 also will switch back to the CAPS mode. The shift key 
can be used in combination with many other keys to produce additional 
control characters. Check your reference manual for the uses of these 
combinations. 


In BASIC, the following keys have special functions. BASIC performs the 
specified function instead of accepting the items on these keys as key- 
board data. 
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Key Function 


c Backspaces and erases the last character typed. 

= Tabs to the next eight-column boundary. 

1 Line feeds. 

T Causes BASIC to accept a bracket ({) used for exponentia- 
tion. 

ENTER Enters the line; BASIC will not interpret a line until you 
press ENTER. 

CLEAR Cancels the current line, erases the display, converts to 


sixty-four characters per line, and positions the cursor to 
the upper left corner (“home”). 


Each key has a repeat feature; if you hold it down for about one second, 
that character will be repeated until you let up. The TRS-80 has a separate 
numeric keypad for convenient numeric entry. These keys are equivalent 
to their matching key on the standard keyboard section. 
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Hardware 


The PET 64 and Commodore 64 computers are made by the same manu- 
facturer, Commodore Business Machines. For each number series, the two 
computers are nearly identical. For example, the PET 64 and the Commo- 
dore 64 differ only as follows: 


™@ The PET 64 comes with a monitor, and the Commodore 64 does not. 
® The Commodore 64 has color capabilities, and the PET 64 does not. 
The following discussion will focus on the Commodore 64. However, the 


commands for saving and loading programs are identical on both ma- 
chines. 


Starting the Computer 


The power switch is in back near the left corner underneath the body of 
the computer. When the power switch is turned on, you see something 
like this: 


#***¥ COMMODORE 64 BASIC V2**#* 
Fehon SYSTEM 38911 BASIC BYTES FREE 


The first line tells which version of the BASIC language is available. The 
second line tells how much memory your computer has (64K in this exam- 
ple). The third line indicates that you can immediately begin typing in 
BASIC line numbers and statements. 


Saving and Loading Programs 


Programs are commonly accessed from either cassette tape or disk on this 
system. 


Cassette 
The Commodore 64 has a convenient file-by-name cataloging system. Af- 


ter typing in a program, you may want to save it on cassette. The SAVE 
command is used to save a program on tape in the following manner: 


SAVE "program-name" 
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To save a program, position the tape to a blank area and type SAVE and 
the program name in quotes, for example, 


SAVE "MASTER" 


The program name can be up to sixteen characters long. After hitting the 
RETURN key, the computer responds with the following: 


PRESS PLAY AND RECORD ON TAPE 


You must then press the RECORD and PLAY buttons on the cassette. If 
you have more than one cassette tape drive, you may have to specify the 
device number; otherwise it will default to 1. For example, if you want to 
save MASTER on cassette tape drive 2, type the following and hit the 
RETURN key: 


SAVE "MASTER",2 


To load a stored program, you need only type LOAD and the program 
name (enclosed in quotes), for example, 


LOAD "MASTER" 
After hitting the RETURN key, the computer responds with the following: 
PRESS PLAY ON TAPE. #1 


Then, when the cassette PLAY button is pressed, the computer will search 
for the named program. The names of other programs found during the 
search will be displayed on the screen. Therefore, the tape does not have 
to be positioned precisely for loading. The computer will tell you when it 
has found the desired program. To actually load the program, press the 
C& key. After the program is loaded, the screen will return to its normal 
state, and the READY prompt will reappear. Remember to specify the de- 
vice number if you have more than one cassette drive. 

An example—loading a program named PINBALL, the third one on a 
tape—is shown here: 


LOAD "PINBALL" 


PRESS PLAY ON TAPE #1 
OK 


SEARCHING FOR PINBALL 
FOUND METRIC 

FOUND DCLOCK 

FOUND PINBALL 

(Press CK key) 

LOAD ING 

READY 
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Keyboard 


Disk 


The Commodore 64 floppy disk system has a file-by-name catalog. After 
typing in a program, you may want to save it on disk. Saving programs on 
disk is similiar to saving programs on cassette; just type the following: 


SAVE "program-name",8 


The 8 tells the computer that you want the program saved to disk. After 
the RETURN key is pressed, the disk will start to turn, and the computer 
will respond with this: 


SAVING "program-name" 
OK 
READY 


For example, if you want to save a program called MASTER on disk, type 
the following: 


SAVE “MASTER",8 
To load a program from disk, you type the following: 
LOAD "program-name",8 


Here again, the 8 is the code for the disk, which lets the computer know 
you want the program loaded from the disk. After the RETURN key is 
pressed, the disk will start whirring, and the following will be displayed: 


SEARCHING FOR “program-name" 
LOADING 


READY 


For example, if you want to load a program called MASTER from disk, just 
type the following: 


LOAD "MASTER",8 


The keyboard has the characters of a standard typewriter keyboard, with 
the addition of the £ character on the upper right side. The shift key works 
like that on the standard typewriter. When in the uppercase /lowercase 
mode, the shift key will cause uppercase letters, or the top symbol on 
those keys with two symbols, to be entered. The shift and CNTRL keys 
may be used with other keys to produce additional control characters. 
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Function Keys 


Special Features 


The following keys have special functions. 


Key 


Function 


ia; 
CRSR 

0 

a 
CRSR 

D 
RETURN 


INST 
DEL 


CLR 
HOME 


RESTORE 


RUN 
STOP 


Moves the cursor downward; when used with the shift 
key, moves the cursor upward. 

Moves the cursor to the right; when used with the shift 
key, moves the cursor to the left. 


Carriage control; enters the line or command. 


Moves the cursor back a space, deleting the previous char- 
acter typed; with the shift key, you may insert a character. 


Positions the cursor in the upper left corner of the screen 
(“home”); with the shift key, clears the screen and places 
the cursor in home position. 


Restores the computer to its normal state. 


Stops execution of a BASIC program; with the shift key, 
allows you to automatically load a program from tape. 


The PET/Commodore 64 has a wide range of graphics keys for colors (on 
Commodore 64 only) and graphic symbols. Pressing the Commodore key 
C& or CNTRL key with other keys allows you to work with these graphics 
control characters. 

The PET/Commodore 64 keyboard also has an additional set of four 
function keys on the right side of the keyboard. These can be programmed 


to handle a variety of functions. 
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Problem Solving Using Computers 


Problem solving using computers involves writing a computer program. 
Since the program is the focal point of computer-assisted problem solving, 
a five-step procedure can be used for the process of problem solving using 
computers. These five steps are as follows: 


w Defining, analyzing, and understanding the problem. 

= Design and document (flowchart) the solution 

m= Write and document the computer program. 

m= Submit the program to the computer. 

= Running, debugging, and testing the computer program. 


Defining, Analyzing, and Understanding the Problem 


The initial step begins with recognizing that a problem does exist and that 
a computer can be used in the attempt to solve the problem. The defining, 
analyzing, and understanding of the problem, its causes, and its possible 
solutions is very critical to the remaining steps of the process. Once the 
problem has been clearly defined and analyzed, a solution is chosen, and 
Step 2 of the process is begun. 


Design and Document (Flowchart) the Solution 


Once the problem solution has been defined, a diagram depicting the nec- 
essary inputs, processes, and outputs needed to solve the problem is pre- 
pared. This diagram is better known as a flowchart and will be described 
in detail shortly. 


Writing the Computer Program 


The next step is to use the flowchart developed in Step 2 to write a com- 
puter program. This program can be written in numerous programming 
languages but will contain the logic flow of inputs, processes, and outputs 
described by the flowchart. The flowchart can represent a one-to-one cor- 
respondence to the statements of the computer program, or it can repre- 
sent the general logic flow of the program. The one-to-one representation 
of flowchart to program is referred to as a detail flowchart or microflow- 
chart, and the general program flow flowchart is referred to as a modular 
flowchart or macroflowchart. 
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Submit the Program to the Computer 


This step requires sitting down at the terminal and typing the program into 
the computer. Once this is done we can move on to the final step; running, 
debugging and testing the computer program. 


Running, Debugging, and Testing the Computer Program 


The final step in the problem-solving process is to run the program written 
in Step 3. The program should be run, resolving the errors that may result 
(debugging), and then it should be tested to determine if the information 
created by the program is in fact correct. This is an important step, and 
care should be taken to test the program under as nearly actual conditions 
as possible. 


Flowchart Preparation | 


Flowchart preparation can be a very important step in problem solving 
using computers, particulary if the individual preparing the flowchart is 
not the individual who will write the computer program. This situation 
arises on a regular basis in systems analysis and design. The systems ana- 
lyst may prepare a flowchart describing the program to be written and 
then pass the flowchart to the computer programmer who will actually 
write the program. It is important, therefore, that a common set of symbols 
be used in preparing flowcharts. 


Flowchart Symbols 


The American National Standards Institute (ANSI) has adopted a set of 
flowcharting symbols that are used to depict the types of operations per- 
formed in a computer program. A basic subset of these symbols is shown 
in Figure F-1. The symbol © is referred to as the terminal symbol and 
represents the beginning and end of the program flowchart. The symbol 2 
is the input/output symbol and is used to describe the point at which data 
enter or are output by the program. The input mediums consist of such 
things as punched cards; CRT terminals; and secondary storage devices 
such as magnetic tape, magnetic disks, or magnetic drums. The output 
mediums can consist of printers, CRT terminals, or secondary storage de- 
vices. The symbol CO, the process symbol, describes such operations as 
addition, subtraction, multiplication, and division. The symbol > depicts 
a comparison or decision that can take one of two possible paths. One path 
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Figure F-1 


FLOWCHART SYMBOLS 


Terminal, 
Interrupt 


Process 


Connector 


Start, stop, or interruption Operation or program step 
point in a program Predefined specified in a subroutine or 
Process another set of flowcharts 


General input/output operation 
> Pod Direction of processing 
or data flow 


Arrowheads 
Any processing function 


Comparison operation that 
determines which of two alternative 
paths is followed 


Connection between 
parts of a flowchart 


represents a comparison or decision that is true, and the other represent a 
comparison or decision that is false. The connector symbol, O, represents 
a connection between two points within the flowchart. The symbol 0 
represents a predefined process that describes a subroutine or another set 
of flowcharts. The arrowhead symbols,>X<, simply represent the direc- 
tion of the logic flow of the flowchart. 


Logic Patterns 


When writing flowcharts, four basic patterns of logic can be used. Figure 
F-2 uses the flowcharting symbols previously described to show these 
four basic logic patterns. The simple, or linear, sequence logic pattern de- 
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scribes the execution of the computer program statements as being one 
after the other in the sequence in which they were stored. The selection 
pattern uses the decision or comparison symbol to demonstrate the ability 
to conduct a test and then follow one of two possible paths based on the 
outcome of the test. 

The loop, or repetition, pattern also uses the decision or comparison 
symbol. In this logic pattern, the test checks on the number of times the 
loop has been executed. Once the test is satisfied and the loop has been 
executed the correct number of times, the basic flow will advance beyond 
the loop. The branch, or link, logic pattern is used to skip a portion of a 
program based on the result of a decision or comparison. The GOTO state- 
ment or clause of many programming languages provides the branching 
mechanism. 

These four basic program logic patterns can represent an entire program 
or a small segment of a program. It is also possible that all four logic pat- 


Figure F-2._ FOUR BASIC PROGRAM LOGIC PATTERNS 


(Continued next page) 
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Figure F-2—Continued 


3. Loop Pattern Execution of E 
and F continues in a loop 
fashion as long as D is true. If 
D is false, the loop is exited, and E 
and F are not executed. The 
logic is DO E and F WHILE D 
is true. 


. Branch, or Link Pattern 
Control is transferred from 
the simple sequence flow 
to another portion of the 
program. For instance, if 
G is false. GOTO J. The 
flow of the program 
continues with execution 
of J (rather than H) when 
ever G is false. 


terns could be contained in a single program. Although the number and 
syntax of the statements necessary to perform these logic patterns may 
vary from programming language to programming language, the basic logic 
patterns themselves will not vary. 
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Figure F-3_ FLOWCHARTING EXAMPLE: TEMPERATURE CONVERSION 


Read 
Fahrenheit 
Temperature 


End 
of 
Items? 


Convert 
Temperature 
to 
Celsius 


Print 
Fahrenheit 
Celsius 


Read 
Fahrenheit 
Temperature 


Flowcharting Example: Temperature Conversion 
Figure F-3 demonstrates the use of flowcharting symbols and the loop 


logic pattern in the flowcharting of the logic flow to convert a Fahrenheit 
temperature to a Celsius temperature. 
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Figure F-4 PSEUDOCODE EXAMPLE: TEMPERATURE CONVERSION 


Alternatives to Flowcharting 


Recently, alternatives to describing the logic flow of a program have been 
gaining acceptance. Two of these alternatives, pseudocode and hierarchy 
charts, use English statements and rectangles to describe the logic patterns 
within the computer program. 


Pseudocode 


Pseudocode uses English statements to describe the logic of the program 
without being concerned with the syntax of a particular programming lan- 
guage. As with flowcharting, pseudocode and hierarchy charts can be used 
to represent the logic patterns in the program regardless of the program- 
ming language used. Figure F-4 demonstrates the use of pseudocode as it 
applies to the temperature conversion example. 


Hierarchy Charts 


Hierarchy charts use rectangles to portray the various levels of a program 
and the manner in which these levels interconnect. The charts are ar- 
ranged from a top-down view. Lower levels are accessed from a process in 
the level above, and two processes on the same level cannot access each 
other. The temperature conversion example is illustrated in Figure F-5 
using a hierarchy chart. 


Pros and Cons of Flowcharting 
Although flowcharts are an important tool in systems analysis and design, 


their popularity and use are declining. In the past, flowcharts have been an 
important piece of program documentation. They can serve as a valuable 
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Figure F-5 HIERARCHY CHART EXAMPLE: TEMPERATURE CONVERSION 


tool to a programmer in the maintenance of existing programs written by 
another person. However, because of the amount of time and effort neces- 
sary to prepare a flowchart when the program is written and to update the 
flowchart when the program is altered, the use of flowcharts has declined 
significantly. 

Many professional programmers can write, debug, and test a program 
without ever writing a flowchart. Programmers address the problem of 
program maintenance without flowcharts by advocating commenting on 
programs within the program code itself. Those working on the program in 
the future then will have explanations of coding in the program via com- 
ments inserted directly into the program code. 

Although flowcharting has lost favor in the professional programming 
environment, it can still serve as an invaluable tool in the education of 
programmers and systems analysts. By presenting a method of problem 
solving including the use of flowcharts, students of programming are 
forced to prepare a definite pattern of logic through a flowchart before 
writing the computer program. This type of problem-solving procedure 
then can act as the foundation of a logical problem-solving procedure. 


The final section of this appendix will demonstrate the use of flowcharts 


and pseudocode in depicting the logic of six common logic problems fre- 
quently encountered in computer applications. 
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Each one of the following common program logic flowcharts uses one or 
more of the four basic logic patterns previously discussed. To understand 
the problems better, an example is provided for each, including a flow- 
chart and pseudocode. 


Input/Output Using Counters 


When processing several input records, one method of detecting the end of 
the file is a counter. Each time an additional record is processed, the 
counter is incremented. When the counter equals the number of records in 
the file, execution stops. To effectively use a counter, the program can 
provide for input of the number of records to be processed. This allows the 
number of records to change each time the program is executed. To insure 
that the counter reflects the proper number of executions, the counter 
should be initialized to 0 prior to the first execution. This replaces any 
previously stored value. 

The processing of customer statements is one example where the num- 
ber of records may change. The number of current customers is inputted 
at the start of execution. Customer data will be read, and statements will 
be printed the specified number of times. Figure F-6 illustrates the basic 
logic for this process. 


Multiple Decisions 


Managers make decisions daily. Often, these decisions are based on sever- 
al criteria. Just as often, these multiple criteria or decisions are answered 
through a computer program. Various answers are generated, depending 
on how many of the required criteria are met. 

As an example, a used car dealer who operates several lots may wish to 
provide fast responses to customer inquiries concerning cars in stock. A 
master inventory listing is maintained for the cars on all lots. Inquiries can 
be made via a CRT for the required make, model, and year. The customer 
will obtain almost instantaneous results concerning the in-stock status and 
location of the car. This logic is shown in Figure F-7. 


Accumulating Subtotals and Totals 


Various subtotals and totals are needed in decision making. These are 
indicators of business activity. The subtotals may be categorized by de- 
partment, item, account classification, or otherwise. The subtotals and to- 
tals are accumulated as records are read or as values are calculated. 
Figure F-8 illustrates the logic for subtotaling various types of checking 
accounts in a bank’s files. These may include minimum balance accounts, 
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Figure F-6 INPUT/OUTPUT USING COUNTERS 


Computer Cash Register 
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PSEUDOCODE: 


Enter number of customers. 
Initialize counter to zero, 
Read customer data set. 
Print customer statement. 
Increment counter. 


If counter less than customers, repeat. 
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Figure F-7_ MULTIPLE DECISIONS 


Customer Request 


CRT and Keyboard 
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Year 


Master Inventory File on Disk 
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Location 


PSEUDOCODE: 


Read customer request. 
Read car in inventory. 
If end of data, print out-of-stdck line. 
Otherwise, compare models. 
If no match, read another’ inventory item. 
Otherwise, compare years. 
If no match, read another inventory item. 
Otherwise, print in-stock line. 


Printer 


Figure F-8 ACCUMULATING SUBTOTALS AND TOTALS 


PSEUDOCODE: 


Initialize accumulators. 
Read data. 
If no more data, print subtotal and total. 
Otherwise, compare categories. 
If different, print subtotal. 
Reset subtotal accumulators. 
Add to accumulators. 
Print data. 


Computer Printout 
@: 7-31-82 CHECKING ACCOUNT BALANCES 


; ACCT. # NAME 
el 21-3647-2 Jean Malloy 


| 34-8963-3 Gary Johnson 256.32 | 
| TOTAL MINIMUM BALANCE $319.78 | 
@} FINAL TOTAL $500.70} 
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senior citizen accounts, corporate accounts, and others. Each type of ac- 
count is identified with a different leading digit. Checking accounts are 
typically ordered by number. As each account balance is read, it is added 
to both the subtotal and total. When the end of a category is reached, the 
subtotal is recorded and reset to 0 to begin the next category. The total, 
however, is retained until all categories are completed. 


Tables 


In some business applications, it is more efficient to store data in a table 
than on each individual record. A code written on the record permits 
access to the table as needed during processing. When the stored values 
need to be changed, the changes are made directly to the table rather than 
to each record. The code on the record remains the same, and the new 
table value is accessed with that code. 

For example, a wholesaler in Indiana may service retailers in all fifty 
states. A table is used that lists the freight charges for shipping to each of 
the states. These are identified on each shipping record by the two-letter 
state abbreviations. Figure F-9 illustrates the logic for generating freight 
statements using this table. At the start of the program, all the data from 
the table are read into arrays so that each data item is read only once. The 
state code from the shipping record is compared with the state codes in the 
array until the correct code is located. If the freight rates change at a later 
date, the table is changed rather than the numerous retailer records. 


Merging Files 


Some applications may routinely or periodically require the merging of 
files. This process combines two or more files into one larger file. If se- 
quential files are used, one record is read from each file and the keys are 
compared. If the keys are ordered from lowest to highest, for example, the 
record with the lowest key is written to the new file. An additional record 
is read from one of the original files to replace the record that was trans- 
ferred. Another comparison is then made. This process continues until all 
records from the original files have been transferred to the new file. 

An automobile insurance company may merge a new customer file with 
a master file as often as daily. Figure F-10 shows the logic for this process, 
assuming the records are ordered sequentially by policy number. Depend- 
ing on the circumstances, a hard copy of the new master file may or may 
not be generated. In this example, a new file is in computer-readable form 
for future processing. 


Sorting 


In many business applications, it is necessary to sort, or order, data sets 
alphabetically or numerically. This can occur when data is collected or 
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Figure F-9 TABLES 


SHIPPING NOTICE 
To: ABC Tool Co. 
Address: 13496 South Bt. | 
Frankfort, KY 
Date Shipped: 7-9-8282 
FOB Origin 


PSEUDOCODE: 


Read table line. 
If more lines, repeat. 
Otherwise, read shipping record. 
If no more records, stop. 
Otherwise, compare table to shipping record. 
If no more items in table, print “error.” 
If equal, print bill. 
Repeat process. 


STATEMENT 


ABC Tool Co. 
13496 South St. 
Frankfort, KY 


7-9-82 Shipping Charge $37.00 
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stored in an order different from that required for sequential file process- 
ing or printing reports. Arrays are used to sort the data, with comparisons 
made between the array locations to determine which items need to be 
switched within a given list. This is referred to as a bubble sort. 

Figure F-11 illustrates the logic for sorting ten new employees by as- 
cending employee number so that the new employee file can be merged 
with the master employee file. The new employee data were originally 
inputted as the applications were submitted and, therefore, are not in or- 
der. 

There are several points to note when sorting. First, a flag is used to 
indicate whether any positions within the array are switched as the loop is 
executed. If the flag equals 1, at least one switch was made. The loop is 
repeatedly executed until the flag remains 0 throughout the execution, 
indicating that the data are in order. Second, the loop terminal value is one 
less than the number of positions in the array. This prevents an error 
message when I equals the terminal value and the I position is compared 
with the I + 1 position. Finally, when ordering a set of data that includes 
more than one field, such as name and number, each field must be 
switched. Otherwise, the numbers would be in order, but they would not 
correspond to the correct name. 
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Figure F-10 MERGING FILES 


INSURANCE APPLICATION 


Name: Ann Crawford 

Address: 7943 Main St. 
Austin, TX 

Car: 1983 Olds Cutlass 


Policy 
Number 


Customer 
File 


in Master 
less than i File 


Write New 
Customer 
Record 
on File 


Read 
New 
Customer 
File 


PSEUDOCODE: 


Read master file. 
Read new customer file. 
If data in both files, 
If new customer is less, write to file. 
Read another file. 
If master is less, write to file. 
Read another file. 
If data not in both files, 
If more new customers, write to file. 
Read another file. Updated 
If more master, write to file. Master 
Read another file. File 
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Figure F-11_ SORTING 


PSEUDOCODE: 


Read employee record. 
If more data, store and read again. 
Otherwise, flag equal zero. 
For 9 times 
If one position less than next, increment counter. 
Otherwise, switch numbers and names. 
Flag equal one. 
Increment counter. 
If flag equal one, repeat loop. 
Otherwise, write data to file. 
If more data, repeat. 
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ABS(X), 155 
Algorithm, 6 
Alphanumeric data, 26 
Apple 2 plus, 311-313 
hardware, 312 
keyboard, 313 
saving and loading, 312-313 
casette, 312 
disk, 313 
special keys, 313 
start up, 312 
Argument, 151 
Arithmetic expressions, 37-38 
hierarchy of operations, 39-40 
Array, 203-234 
merge, 222 
one dimensional, 209-211 
computations with, 210 
printing data, 209-210 
reading data, 209 
search, 225 
binary, 226-227 
sequential, 226 
sorting, 227-234 
bubble sort, 229-233 
shell sort, 233-234 
two dimensional, 212-218 
adding columns, 218 
adding rows, 215 
reading and printing, 214-215 
totaling, 218 
ASCII, 183 
ATN(X), 151 


BASIC, ANSI, 3, 8 
background, 3 
Branch, 87 


Character string, 26, 40, 43 
CHR$, 183 

Comma, 42, 65-68 
Compilers, 4 


Concatenate, 178 
Constant, 24 
character string, 26, 40 
numeric, 24 
exponential notation, 25 
real numbers, 24 
Conversational mode, 59 
COS(X), 151 
Counter, 101-103, 338 


DATA, 60-63, 64 

Debugging, 46 

DEC System 2060, 307-310 
hardware, 308 
keyboard, 309 
saving programs, 309 
signing off, 309 
signing on, 308 
special features, 310 
special keys, 310 

DIM, 208-209 

Disk, 252 

Documentation, 35 


Editing command, 14-15 
END, 46 
Exception-handling, 174 
EXP(X), 152 
Exponential notation, 25 
Expression, 21 


Field, 251 
File, 251-252 
File processing, 249-277 
random data files, 263-276 
on Apple, 268-272 
on DEC, 265-268 
on IBM, 272-276 
on PET, 276 
on TRS-80, 259 
Flag, 229 
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Flowcharting, 6-7, 329-344 
decision block, 93 
FOR/NEXT loop, 121 
supplement, 329-344 
hierarchy charts, 336 
logic patterns, 332-335 
program logic flowcharts, 338-344 
accumulating totals, 338 
INPUT/OUTPUT using counters, 
338 
merging files, 342 
multiple decisions, 338 
sorting, 342-344 
tables, 342 
pseudocode, 336 
symbols, 6-7, 331-332 
FOR/NEXT, 119-131 
nested, 130-131 
Format control character, 73-74 
Function, 150-160 
library, 151-157 
exponentiation, 152 
(see also EXP(X), LOG(X), SQR(X) ) 
mathematical, 153-157 
(see also INT(X), SGN(X), ABS(X), 
RND) 
trigonometric, 151 
(see also ATN(X), COS(X), SIN(X), 
TAN(X) ) 
string, 178-188 
ASCII, 183 
CHR$§, 183 
concatenation, 178 
LEFT$, 179 
LEN, 179 
MID$, 182 
RIGHTS, 179 
STR$, 188 
VAL, 186 
user-defined, 159-160 


Garbage in-garbage out error, 174 
GOSUB, 171 
GOTO, 87 

computed, (see ON/GOTO) 


Hierarchy charts, 336 


IBM Personal Computer, 315-318 
hardware, 316 
keyboard, 317 
saving and loading, 316-317 
special features, 318 


Index 


special keys, 317-318 
start up, 316 
IF/THEN, 91 
IF/THEN/ELSE, 93 
nested, 94-97 
Index, (see variable, loop) 
Indexed files, 279 
Initialization, 63, 296 
INPUT, 3, 58, 63 
Inquiry-and-response, 59 
INT(X), 153 
Interpreter, 4 


LEFT$, 179 

LEN, 179 

LET, 11, 36-41, 63 

Line editor, 15 

Line number, 8, 21-23 

LOG(X), 152 

Logic errors, 46 

Logical operations, 4 

Loop, 99-103 
entry and exit points, 126-129 
FOR/NEXT, 121-131 

nested, 130-131 

infinite, 89, 123 
inner, 130 
outer, 130 
UNTIL/NEXT, 133 
WHILE/NEXT, 133 
WHILE/WEND, 133-135 


Mantissa, 25 

MAP, 265 

Mask, 73 

Matrix (MAT), 291-297 
input/output, 291 
mathematical operations, 294-298 

Menu, 99 

MID$, 182 

Multiple statements, 46 


Natural logarithm, 152 

Nested FOR/NEXT statements, 130-131 

Non-destructive read/destructive write, 
62 


ON/GOSUB, 176 
ON/GOTO, 97-98 
Outer loop variable, 126 


PET/Commodore 64, 323-327 
function keys, 327 
hardware, 324 
keyboard, 326 
saving and loading, 324-325 

cassette, 324-325 
disk, 326 
special features, 327 
start up, 324 

PRINT, 42-45 
blank lines, 44 
literals, 43-44 

character strings, 43 
numeric, 44 
values of expressions, 44 
values of variables, 42 

PRINT USING, 73-75 

Print zone, 65-68 

Programming process, 5-9 

Prompt, 59 

Pseudocode, 336 


Question-and-answer mode, 59 


Random data files, 263-276 
READ, 11, 60-63, 64 
Record, 251 
Relational symbol, 91 
Relative files, 264 
REM, 8, 35 

Reserved words, 29 
RETURN, 171 
RIGHTS, 179 

RND, 157 

RUN, 21 


Screen editor, 15 
Semicolon, 68-69 
Sequential data files, 251-263 
opening, 252 
reading, 253 
SGN{(X), 153 
SIN(X), 151 
Sort, 227-234 
bubble sort, 229-233 
shell sort, 233-234 
SQR(X), 152 


Index 


Statement, 21 
Step value, 119 
STOP, 174 
Stored-program concept, 4 
String function, 178 
STR$, 188 
Subroutine, 171 
Subscript, 207-208 
Syntax, 9, 41 
System command, 12-14 
list, 13 
load, 14 
new, 12 
save, 14 
scroll, 14 


TAB, 70-73 
TAN{(X), 151 
Terminal value, 101 
Track, 252 
Trailer value, 101 
Transfer, conditional, (see IF/THEN & 
ON/GOTO) 
unconditional, (see GOTO) 
TRS-80, 319-322 
hardware, 320 
keyboard, 321 
saving and loading, 320-321 
cassette, 320 
disk, 321 
special features, 322 
special keys, 321 
start up, 320 


UNTIL/NEXT, 133 


VAL, 186 

Variables, 26 
loop, 119 
numeric, 27 
string, 28 
subscripted, 208 
unsubscripted, 208 


WHILE/NEXT, 133 
WHILE/WEND, 133-135 
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BASIC Language Commands 


CLOSE 
DEF 

DIM 

END 
FOR/NEXT 


GET 
GOSUB/RETURN 


GOTO 
IF /THEN 
IF/THEN/ELSE 


INPUT 


CET 

MAP 

MAT 
ON/GOTO 
OPEN 

PRINT 

PRINT USING 


PUT 
READ/DATA 


REM 

STOP 

TAB 
UNTIL/NEXT 


WHILE/NEXT 


Closes a file 

Defines a function 

Sets dimensions for arrays 

Indicates the last statement in a program 
Sets up a loop 


Reads a record from the file into a buffer 
Branches to a subroutine, then returns to the main 
line of the program 


Signals unconditional transfer of control 
Signals conditional transfer of control 
Signals conditional transfer of control 


Allows data to be entered at the terminal 


Indicates an assignment statement 

Establishes a buffer for file input and output 
Indicates a command for various matrix operations 
Signals a conditional transfer of control 

Creates or accesses a data file 

Displays or prints output 

Permits flexibility in formatting output; used with 
image statement 

Writes a new record from the buffer to the file 
Reads data into variables from the data list 


Provides documentation 

Stops execution of a program 

Used in a PRINT statement to format output 
Sets up a loop 


Sets up a loop 


100 CLOSE #1 
10 DEF FNR(X) = 4 * 3.1416 * XA2 
20 DIM A(25) 

999 END 
30 FOR| = 1TO5 


70 NEXT | 
230 GET #1,RECORD 4 
100 GOSUB 350 


400 RETURN 
15 GOTO 60 
200 IF N$ = “LAST” THEN 400 
350 IF X = Y THEN PRINT "X = Y" ELSE PRINT 
KY" 
40 INPUT J$, A 
or 
40 INPUT “NAME, AGE"; J$, 4 
9OLETB=B+A 
10 MAP BUFF 1 N$ = 20 
400 MAT PRINT A 
10 ON J GOTO 40, 50, 60 
10 OPEN "GRADES" AS FILE #2 
60 PRINT "TOM" 
40 PRINT USING 90,B 


160 PUT #1,RECORD 12 
30 READ A,B,C 

40 DATA 40,50,60 

10 REM LOOP BEGINS 
75 STOP 

80 PRINT TAB(5);N 

25 UNTIL C = 10 


60 NEXT 
80 WHILE A<X 


120 NEXT 


BASIC String Functions 


LEN(string) : ata Si ofa )} ~~ If H$ is HELLO HOWARD, 
then LEN(H$) is 12 
LEFTS(string,expression) Returns the number of leftmost LEFT$("ABCDE" 2) is AB 
| characters of a string specified 
the expression 
RIGHTS§(string,expression) — turns: tmost charac ers: RIGHTS("ABCDE",2) is BCDE Finds last n characters 
pits acer i era) a ane 
sili 


ASCil(string) @ for | 
; first character in the ne : pei oe is 68° 

CHR&(expression) Returns the string representation _If CHRS(FS) Siz then 20 

| of the ASCII code of the 

iy | expression ae 

VAL (expression) fe Returns is numeric ent « X = VAL(H$) _ 


STRS(expression) 


entire. a 
Lists line 100 with neal) 
tists A est co beaiagor ha iS ide 100 widlieader: 
Lists all lines from line 100 to end of program with header : 
Lists lines 100 through 150 inclusive with header 
Same as LIST, but no header printed 
Saves program in Se: 
Clears memory 


BASIC Arithmetic Functions 
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